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ABSTRACT 


A  digital  computer  program  for  modelling  the  dynamic  thermal 
characteristics  of  confinement  livestock  housing  was  developed  to 
facilitate  the  simulation  of  the  thermal  environment  within  such  a 
unit.  The  mathematical  model  employs  z-transfer  functions  for  the 
calculation  of  transient  heat  transfer  through  the  structural  com¬ 
ponents  and  accounts  for  solar  radiation  heat  load  as  well  as  the 
heat  produced  by  the  animals.  The  model  predicts  the  interior 
temperatures  and  humidities  as  well  as  the  interior  and  exterior 
surface  temperatures  as  a  function  of  external  environment,  type  of 
construction  and  management  practices. 

The  algorithms  included  in  the  model  give  the  accuracy  and 
sophistication  required  to  simulate  the  dynamic  thermal  environment 
that  exists  in  commercial  livestock  housing.  A  comprehensive 
documentation  of  the  computer  program  was  prepared  to  allow  use  of 
the  model  with  no  serious  difficulties.  This  documentation  consists 
of  a  detailed  explanation  of  the  program  via  a  flow  diagram  and  a 
detailed  explanation  of  the  input  and  output  formats. 

The  reliability  of  the  predictions  made  by  the  model  were 
evaluated  by  a  verification  trial  in  a  typical  commercial  total 
confinement  unit.  Specific  measurements  were  made  and  the  recorded 
data  compared  with  the  predicted  values  that  were  generated  by  the 
model.  This  validation  trial  indicated  that  the  prediction  of  the 
thermal  environment  within  total  confinement  livestock  housing  was 
accurate,  but  dependent  on  the  accuracy  of  the  input  data. 
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The  potential  value  of  the  model  for  practical  and  research 
purposes  are  discussed.  Experience  with  and  modifications  to  the 
model  are  required  to  define  and  evaluate  any  imperfections  and 
limitations  that  may  exist  within  the  model. 
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1.  INTRODUCTION  AND  OBJECTIVES 


The  need  for  sophisticated  environmental  modification  has 
increased  as  livestock  producers  raise  more  animals  in  high  density 
total  confinement  houses.  These  modifications  play  a  significant  role 
in  determining  whether  the  producer  realizes  a  profit  or  loss. 

The  traditional  practice  for  design  of  livestock  structures  has 
involved  assigning  desired  interior  conditions,  selecting  a  mean 
outside  design  condition  and  applying  steady  state  heat  and  mass 
transfer  relationships  to  establish  the  design.  This  approach  for 
design  of  total  confinement  is  limited  by  certain  factors  such  as  the 
moderating  influence  exerted  by  thermal  capacities  of  the  structural 
components,  the  variation  of  animal  heat  production  with  changes  in 
temperature  and  other  ambient  conditions,  and  with  the  influence  of 
solar  heat  load  on  the  structure. 

In  the  past  decade,  many  techniques  of  systems  analysis,  includin 
mathematical  modelling  and  computer  simulation  have  been  applied  to 
the  analysis  and  solution  of  many  agricultural  problems.  A  digital 
model  was  developed  to  determine  the  dynamic  thermal  characteristics 
of  a  hypothetical  swine  barn  by  Feddes  et  al  (39).  This  model  applied 
modern  mathematical  algorithms  to  the  transient  heat  transfer  through 
walls  and  roof  and  was  able  to  account  for  the  effect  of  solar  heat 
load  as  well  as  the  heat  produced  by  the  animal. 

The  objective  of  this  research  project  was  to  develop  a  model  of 
the  thermal  envi ronment  wi thin  total  confinement  livestock  housing, 
which  could  be  utilized  for  systems  analysis  of  environmental  control 

alternatives.  To  help  achieve  this  objective  would  necessitate: 

-  1  - 


■ 

f'  •  -  >  *  ~  >  ■  *  •  •  -i  '  *w 


2 


1.  Modification  of  the  existing  mathematical  model  (39) 
to  achieve  the  accuracy,  flexibility  and  adaptability 
necessary  for  systems  analysis  of  environmental  control. 

The  model  would  require  altering  to  permit  prediction  of 
interior  temperatures  and  humidities  as  well  as  interior 
and  exterior  surface  temperatures  as  a  function  of  external 
environment,  type  of  construction,  and  management  practices. 

2.  Preparation  of  comprehensive  documentation  of  the  computer 
program.  This  would  require  detailed  program  flow  charting 
and  input/output  formats. 

3.  Verification  of  the  model  with  a  typical  commercial  total 
confinement  unit.  This  would  include  collection  of 
specific  measurements  and  comparison  of  these  with  predicted 
values  generated  by  the  model. 
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2.  LITERATURE  REVIEW 


2.1  Livestock  and  the  Environment. 

In  biological  terms,  environment  may  be  defined  as  "all  the 
conditions,  circumstances,  and  influences  surrounding,  and  affecting 
the  development  of,  an  organism"  (45).  An  animal's  environment 
consists  of  all  external  conditions  that  affect  its  development, 
growth  and  response.  Baxter  (9)  suggests  that  the  environmental 
complex  should  be  considered  from  the  aspects  of  three  primary 
constituents  -  social,  climatic  and  structural.  The  social  and 
structural  environment  will  be  discussed  only  briefly  since  the 
climatic  environment  is  of  major  concern  in  this  model. 

2.1.1  Social  Environment. 

Scott,  as  cited  by  Baxter  (9),  divided  the  general  behavioral 
functions  of  animals  into  nine  categories  and  indicated  the  building 
design  considerations  for  each.  These  categories  considered  the 
following:  food  receptacles  should  be  properly  sized,  shaped  and 
located;  properly  designed  defecating  and  urinating  areas  should  be 
provided;  convenient  mating  areas  should  be  designed;  good  design 
should  eliminate  danger  zones  for  inquisitive  young  stock,  yet  allow 
freedom  for  mother/young  relationships;  and,  proper  design  and  layout 
should  be  considered  to  maintain  dominance/subordination  relationships 
when  livestock  are  kept  in  groups. 

Baxter  (9)  noted  that  the  area  of  the  stock  confinement  and 

the  number  of  livestock  on  such  an  area  combine  to  produce  a  given 

stocking  density  but,  although  the  stocking  density  may  be  constant  for 

any  number  of  animals,  the  group  behavior  and  performance  may  be 
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affected  by  the  actual  numbers  of  individuals  within  the  group.  The 
number  of  animals  also  may  be  selected  on  the  basis  of  reducing  the 
amount  of  supplemental  heat  required  (36).  Stocking  density  must  be 
selected  such  that  moisture  produced  within  the  building  can  be  removed 
in  the  winter  and  excess  heat  removed  in  the  summer  by  means  of  the 
air  exchange  system. 

2.1.2  Climatic  Environment. 

The  weather  of  any  region  may  vary  with  a  fairly  wide  range  of 
climatic  variations.  With  the  introduction  of  technology,  some  degree 
of  control  over  the  climatic  factors  is  now  feasible  by  providing  total 
confinement  environments. 

The  climatic  environment  may  be  subdivided  into  the  thermal 
environment  and  the  chemical  environment  (9).  The  thermal  environment 
consists  of  the  dry-bulb  temperature,  air  movement,  air  moisture 
content  and  mean  radiant  temperature,  while  the  chemical  environment 
consists  of  vapors,  gases,  dusts  and  odors. 

2 . 1 . 2 . 1  Thermal  Environment. 

Several  references  have  summarized  the  thermal  environmental 
requirements  of  livestock  and  poultry  (2,4,8,9,36,104).  These  sources 
note  the  need  to  avoid  low  temperatures  because  of  the  extra  energy 
expended  for  body  temperature  maintenance. 

The  level  of  the  ambient  temperature  is  generally  accepted  as 
the  environmental  factor  that  most  affects  the  performance  of  growing¬ 
finishing  swine  (4,17,36,44,51,52,53,71,80).  Various  research  results 
are  not  in  complete  agreement  as  to  the  magnitude  of  the  differences 
in  performance  that  occur  at  various  air  temperatures,  but  temperatures 
of  approximately  74°F  for  lightweight  pigs  and  62°F  for  heavyweight 
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hogs  are  generally  found  as  the  environmental  temperature  at  which 
swine  achieve  maximum  growth  patterns.  Bond  et  al  (17)  found  that, 
if  daily  air  temperatures  cycle  more  than  10°F  on  either  side  of  70°F, 
the  daily  gain  of  pigs  will  be  lowered  and  their  feed  requirements  per 
pound  of  gain  will  be  increased.  In  agreement,  Harman  et  al  (50) 
found  that  small  diurnal  variations  in  air  temperature  (60°F  -  70°F) 
do  not  greatly  reduce  the  production  efficiency  of  swine.  However, 
separate  environments  in  a  farrowing  house  are  a  major  problem,  for  the 
optimum  temperature  at  which  pigs  appear  to  thrive  is  too  high  for  a 
sow. 

Maximum  efficiency  in  egg  production  is  achieved  in  an 
environment  which  provides  ambient  temperatures  in  the  55  -  60  F 
thermoneutral  range  according  to  Phillip  and  Esmay  (85)  while  Yeck  (107) 
defines  this  range  as  being  between  45°F  and  65°F.  Others  (33,65)  found 
that  higher  temperatures  of  around  75°F  are  the  environmental  conditions 

under  which  the  least  feed  is  consumed. 

The  optimum  temperature  range  for  beef  and  dairy  cattle  is  large 
and  dependent  on  breed,  age,  weight  and  condition  of  the  animal  (36,61). 
The  range  within  which  dairy  cattle  will  maintain  a  normal  level  of 
milk  production  is  usually  given  as  10°F  to  80°F  while  that  for  normal 
gains  in  beef  cattle  is  given  as  0°F  to  80°F  (2,4,8,36). 

Water  has  been  shown  to  relieve  heat  stress  of  pigs  under  a 
variety  of  conditions  (18,29,48,54,78).  In  these  investigations, 
spraying  periodically  and  allowing  the  pig  to  dry  between  wettings  was 
found  to  have  an  advantage  over  other  methods. 

2. 1.2. 2  Chemical  Environment. 

In  general,  the  chemical  constituents  of  the  climatic 
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environment  result  from  the  processes  which  occur  within  total 
confinement  livestock  production  units.  Only  since  rapid  changes  have 
been  occurring  in  housing  and  husbandry  systems,  has  attention  been 
given  to  the  chemical  aspects  of  the  climatic  environment. 

Baxter  (9)  stated  that  the  majority  of  odors  emanating  from 
livestock  production  enterprises  are  associated  with  the  biological 
degradation  of  the  animal  wastes  and  the  body  odor  of  the  animals. 

Dale  and  Ogilvie  as  cited  by  Hoglund  and  Albright  (56)  suggest  that 
operators  must  be  made  aware  of  the  possible  side  effects  of  such  gases 
as  hydrogen  sulfide,  ammonia,  carbon  dioxide  and  methane  on  livestock 
and  man  if  proper  precautions  are  not  taken.  Gases  and  objectionable 
odors  must  be  removed  from  confinement  housing;  however,  it  appears 
that  if  the  ventilation  system  removes  the  vaporized  moisture,  the  other 
ventilation  requirements  will  be  satisfied  (36,50). 

With  the  advent  of  stronger  pollution  control  regulations,  the 
type  of  waste  management  system  to  use  becomes  a  major  decision  in  live¬ 
stock  confinement  housing.  A  very  detailed  annotative  bibliography  of 
research  in  the  waste  management  area  (72)  defines  this  area  very  well. 
Public  attitudes  toward  manure  odors  and  pollution  of  streams,  rivers 
and  lakes  must  be  considered  in  the  location  of  new  livestock  units 
and  the  type  and  structure  of  waste  management  selected. 

2.1.3  Structural  Environment. 

Baxter  (9)  states  that  the  structural  environment  may  be 
created  by  natural  or  manufactured  objects.  With  increased  emphasis 
on  intensified  livestock  production  in  total  confinement,  the 
structural  environment  is  becoming  more  man-made.  The  same  author  also 
states  that  the  type  of  floor,  its  age,  surface  texture  and  condition. 
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materials  and  construction,  may  all  lead  to  animal  discomfort,  injury 
or  even  disease.  Discomfort  and  injury  to  livestock  can  also  result 
from  poorly  designed  equipment,  and  poor  overall  planning. 

2 .2  Heat  and  Moisture  Production  Within  Total  Confinement. 

Livestock  and  poultry  produce  various  quantities  of  heat  and 
moisture.  For  the  design  and  operation  of  any  effective  environmental 
control  system,  the  quantities  of  heat  and  water  vapor  produced  in  the 
building  must  be  predicted  accurately.  This  means  that  the  use  of 
bedding,  arrangement  of  the  gutters,  the  method  of  barn  cleaning,  and 
the  type  of  waterers  used,  certainly  will  affect  the  amount  of  free 
water  evaporated,  as  well  as  the  amount  of  sensible  heat  left  for 
heating  the  building. 

Dick  and  Loader  (32)  state  that  heat  loss  in  the  form  of  water 
vapor  may  vary  considerably  depending  upon  management  practices, 
building  design,  and  effectiveness  of  the  ventilation  system.  Many 
results  of  investigations  in  the  areas  of  heat  and  moisture  production 
have  been  summarized  and  presented  as  recommended  values  for  moisture 
and  heat  production  for  cattle,  pigs  and  poultry  in  codes  and 
standards  for  ventilation  design  purposes  (2,4,8).  There  are  limitations 
to  these  criteria  as  they  are  too  generalized  to  meet  all  situations 
where  a  number  of  factors  react  differently  than  those  on  which  the 
data  are  based. 

Reece  and  Deaton  (87)  found  that  the  total  heat  removed  from  a 
poultry  unit  during  the  summer  was  the  same  as  the  total  heat  removed 
during  the  winter  with  the  only  difference  being  the  sensible  to 
latent  heat  ratio.  This  ratio  of  sensible  to  latent  heat  production 
may  be  affected  by  age,  weight,  conditions  and  species,  by  ambient 
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and  mean  radiant  temperatures  and  by  plane  of  nutrition  of  the  animals 
confined  (36). 

Reece  and  Deaton  (87)  suggested  that  sensible  heat  production 
was  not  satisfactory  as  a  ventilation  criterion  because  of  the 
occurrence  of  low  sensible  heat  removal  during  the  afternoon  which 
may  have  been  due  to: 

1.  a  reduction  in  heat  production  of  the  animals  since  there 
was  less  activity  and  an  adjustment  in  metabolism  at 
this  time, 

2.  floor  litter  becoming  ,  in  fact,  a  heat  sink  at  high 
temperatures  with  the  release  of  heat  as  ambient  temperatures 
fall  as  a  result  of  decreasing  outside  temperatures,  or 

3.  the  sensible  heat  being  used  to  evaporate  litter  moisture 
during  the  afternoon  when  the  lowest  relative  humidity 
existed. 

The  proportion  of  metabolic  heat  dissipated  by  evaporation 
increases  with  rising  environmental  temperatures  and  with  decreasing 
temperature  gradient  between  the  animal  and  air.  The  amount  of 
moisture  removed  from  a  confinement  unit  approaches  the  total  water 
consumed  as  ambient  temperature  increases  (15).  Esmay  et  al  (37) 
found  that  high  outside  temperature  conditions  appeared  to  bring  about 
higher  ratios  of  latent  heat  removal  even  when  high  outside  relative 
humidities  prevailed  than  at  lower  outside  temperature.  Mount  (80) 
found  that,  as  a  proportion  of  total  heat  loss,  the  evaporative 
heat  loss  of  pigs  rose  from  8%  at  48°F  to  10  -  20%  at  86°F  and  then 
to  30  -  60%  at  temperatures  above  the  critical  level  of  93°F. 
Butchbaker  and  Shanklin  (20)  obtained  similar  values  from  their 
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measurements.  Further  research  by  Morrison  et  al  (77)  indicated  that 
the  physical  environmental  factors  cannot  account  directly  for  the 
change  or  lack  of  change  in  the  rate  of  vapor  production  of  swine 
under  different  conditions. 

Bond  et  al  (14)  studied  the  effect  of  wind  on  swine  production 
and  found  sizeable  increases  in  total  heat  loss  due  to  wind  even  at 
antiient  temperatures  as  high  as  90°F.  Total  heat  loss  increased  with 
increased  wind  in  spite  of  reduced  radiation  losses.  As  indicated  in 
this  study,  air  velocity  should  be  considered  in  estimating  heat  loss 
quanti ties. 

Air-conditioning  and  ventilation  for  hog  houses  requires 
accurate  information  on  optimum  productive  environments  for  hogs  and 
the  heat  and  moisture  they  produce.  Bond  et  al  (16)  presented  heat 
and  moisture  relationships  needed  for  designing  hog  house  ventilation, 
insulation  or  air  conditioning  for  optimum  environmental  conditions 
for  hogs  50  to  400  pounds  at  air  temperatures  of  40°F  to  100°F. 

Changes  in  heat  and  moisture  content  of  the  air  passing  through  the 
room  were  used  as  a  measure  of  heat  and  moisture  released  by  the 
animals.  Animal  management  and  conditions  within  the  test  chamber 
were  representative  of  normal  farm  conditions.  No  bedding  was  used  and 
the  pens  were  cleaned  twice  daily.  Air  velocities  were  usually  from 
15  to  30  feet  per  minute  accounting  for  20  air  changes  per  hour  and 

the  relative  humidity  was  near  50%. 

Harmon  et  al  (50)  compared  the  quantity  of  moisture  removal 
by  ventilation  air  from  swine  pens  with  a  slatted  floor,  a  partially 
slatted  floor  and  a  concrete  floor.  They  found  highly  significant 
differences  between  moisture  vapor  removal  rates  of  the  three  pens. 
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They  concluded  that  water  vapor  produced  by  swine  in  a  slatted  floor 
house  that  must  be  removed  by  ventilation  (lagoon  underneath)  is  0.42 
as  much  as  that  in  a  concrete  floored  house.  For  a  partially  slatted 
floor,  the  removal  is  directly  proportional  to  the  percentage  of  the 
floor  that  is  slatted.  They  also  found  that  the  regression  equations 
of  Bond  et  al  (16)  were  useful  for  prediction  of  heat  and  moisture 
production,  but  must  be  adjusted  for  slatted  floors.  Also,  if  bedding 
is  used  on  solid  floors,  the  data  can  increase  by  as  much  as  one-third. 
For  beef  housing,  Feddes  and  McQuitty  (38)  found  the  water  vapor  produced 
by  beef  in  a  slatted-floor  house  that  must  be  removed  by  ventilation  is 
0.69  as  much  as  that  in  a  straw-bedded  solid-floor  house. 

For  design  purposes,  the  regression  equations  and  data  (16)  for 
heat  and  moisture  production  reflect  the  actual  conditions  better  than 
many  other  methods  used  for  these  calculations  (2,4,23).  This  data 
is  true  only  for  air  velocities  not  exceeding  50  fpm  and  must  be 
adjusted  where  slatted  floors  are  used.  There  also  are  many  other 
influencing  factors  such  as  relative  humidity,  feed  ration,  etc.  not 
included  in  the  regression  equation.  This  would  suggest  that  there  is 
no  precise  prediction  method  currently  available. 

2.3  Systems  Analysis. 

2.3.1  Systems  Concept. 

In  a  society  that  is  producing  more  people,  more  materials,  and 
more  information  than  ever  before,  the  systems  approach  is 
indispensable  in  meeting  the  challenges  of  the  complexity  of 
interrelationships  that  exist  in  modern  systems.  For  example,  in  a 
study  into  food  production  by  Rodda  (89),  no  less  than  eighteen 
universities  cooperated  to  give  the  participants  experience  in  the 
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systems  approach. 

The  systems  method  recognizes  each  system  as  an  integrated  whole 
even  though  composed  of  diverse,  specialized  structures  and  sub¬ 
functions  (24,25).  Systems  analysis  emphasizes  the  total  process, 
rather  than  the  individual  sectors  of  the  process  (34). 

Operations  Research  in  many  cases  is  referred  to  as  being 
synonymous  to  systems  analysis.  Wagner  (101)  defines  operations  research 
as  a  scientific  approach  to  problem  solving  involving  the  construction 
of  mathematical,  economic,  and  statistical  descriptions  on  models  of 
decision  and  control  problems  to  treat  situations  of  complexity. 

Systems  analysis  is  the  selection  of  elements,  relationships,  and 
procedures  to  achieve  a  specific  purpose  (100). 

Systems  analysis  techniques  presently  are  being  utilized  in  many 
areas  of  research  and  management.  Preston  (86)  presents  a  good  guide 
to  some  of  the  sources  of  applications  of  systems  analysis  methods. 
Presently,  computers  are  being  used  in  many  of  these  applications  (26). 
Since  Charles  Babbage's  Analytical  Engine  of  about  1840  (43),  computer 
technology  has  advanced  to  where  it  is  absolutely  essential  to  analysis 
and  understanding  of  complex  phenomena. 

2.3.2  Modelling  and  Simulation. 

In  systems  analysis,  a  model  is  usually  a  mathematical  and 
necessarily  an  approximate  representation  of  reality.  With  parameters 
specified  by  historical  and  technological  data,  mathematical  solutions 
then  can  be  calculated.  The  model  also  must  be  validated.  Sensitivity 

testing  is  an  essential  part  of  the  validation  process..  *■ 

In  the  design  of  a  system,  the  development  of  a  simulation  model 
that  is  sufficiently  general  to  be  adaptable  to  many  and  varied 
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situations  is  desirable.  According  to  McLeod,  as  cited  by  the 
Department  of  Chemical  and  Petroleum  Engineering  (30),  "simulation  is 
the  act  of  representing  some  aspects  of  the  real  world  by  numbers  or 
symbols  which  may  be  easily  manipulated  to  facilitate  their  study..." 
By  the  process  of  representing  through  analogy,  simulation  has  been 
developed  as  a  powerful  analytical  tool  in  the  solution  of  numerous 
problems  (66).  Simulation  and  the  use  of  the  computer  have  become 
very  closely  linked  merely  because  of  the  large  number  of  calculations 
required  in  even  the  simplest  of  simulation  models.  The  crux  of  the 
problem,  of  course,  is  intimate  man-machine  communication.  "...  The 
engineer  requires  a  conveniently  manageable  system,  the  scientist 
requires  sufficient  intimacy  to  provide  real  insight  into  the  complex 
interplay  of  problem  variables;  the  creative  user  requires  computing 
power  and  flexibility  to  permit  imaginative  use  of  the  computer  and 
graphic  display  to  permit  recognition  of  inventive  solutions..."  (30). 

Wagner  (101)  states  that  model-building  is  the  essence  of  the 
operations  research  approach.  Such  a  model  assists  in  putting  the 
complexities  and  possible  uncertainties  attending  a  decision-making 
problem  into  a  logical  framework  amenable  to  comprehensive  analysis. 

A  model  is  then  a  vehicle  for  arriving  at  a  well -structured  view  of 
reality. 

2.3.3  Appli cations. 

Systems  analysis  techniques  have  been  suggested  and  applied  to 
many  agricultural  situations  and  problems  (5 ,6 ,22 ,63', 67 ,68,90) .  The 
tools  of  the  systems  approach  are  usually  models  and, more  recently, 
computer-based  models  to  speed  the  process  of  modelling. 

Many  models  have  been  developed  to  assist  in  systems  analysis 
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of  environmental  control.  Albright  and  Scott  (1)  presented  a 
mathematical  analytical  solution  which  predicted  the  inside  temperature 
of  a  ventilated  structure  subjected  to  daily  variations  of  outside  air 
temperature  and  solar  heating.  Beckett  and  Vidrine  (11)  presented  a 
mathematical  model  that  predicted  the  effects  of  thermal  environment 
on  some  physiological  responses  of  a  pig,  including  heat  produced, 
moisture  produced,  pig  surface  temperature  and  the  weight  gain.  A 
general  model  of  air-conditioning  calculations  was  developed  by 
Mitalis  et  al  (76),  while  Phillips  and  Esmay  (85)  developed  a  model  of 
the  environmental  surroundings  of  the  laying  hen  and  adapted  this  model 
for  computer  simulation  studies.  Paine  and  Nelson  (84)  discussed  an 
analog  simulation  model  for  a  system  control  engineering  approach  to 
prediction  of  animal  growth/environment  interaction.  Carson  (23) 
presented  a  digital  model  for  swine  environments  predicting  the  gain 
and  feed  conversion  fractions  calculated  using  mean  values  of  simulated 
ambient  temperatures  and  relative  humidities. 

The  main  short-coming  of  many  of  these  models  is  that  they  have 
been  developed  for  a  specific  situation  and  require  major  revisions 
before  they  may  be  applied  to  the  prediction  of  the  environment  in  total 
confinement  resulting  from  a  wide  range  of  design  and  management 
factors.  Only  after  models  have  been  developed  that  incorporate  the 
sophistication  necessary  for  systems  analysis  can  they  be  integrated 
into  an  overall  agricultural  model  and  applied  in  the  process  of  farm 
rati  onalization. 

The  Feddes  et  al  model  (39)  determined  the  thermal  characteristics 
of  a  total  confinement  livestock  unit  for  a  wide  range  of  design  and 
management  factors,  offering  a  level  of  sophistication  that  was  not 
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previously  available.  As  indicated  by  the  reference  source, 
experience  and  modification  are  required  to  fully  evaluate  the 
limitations  of  the  model.  However,  improving  upon  the  accuracy, 
flexibility  and  adaptability  of  the  model  may  lead  to  a  better  under¬ 
standing  of  the  dynamic  thermal  environment  within  total  confinement 
livestock  housing. 
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3.  MODELLING  PROCEDURE 


Model  formulation  is  an  inductive  process  in  which  the 
mathematical  relationships  between  variables  are  hypothesized  to 
describe  the  system  to  be  studied. 

The  revised  model  of  the  thermal  environment  in  total  confinement 
swine  housing  (referred  to  as  "the  model"  throughout  the  remaining 
discussion)  is  represented  in  the  flow  diagram  (Figure  1).  The  model 
is  divided  into  seven  basic  parts  to  provide  the  following  functions: 

1.  Determination  of  solar  position,  intensity  of  solar  radiation 
on  outer  surfaces  of  the  total  confinement  unit,  sol-air 
temperature,  and  solar  heat  gain  factors  for  the  building. 

2.  Calculation  of  the  z-transfer  function  coefficients  for  walls, 
roof  and  doors. 

3.  Calculation  of  the  thermal  resistance  of  the  attic  space  in  the 
pitched  roof. 

4.  Calculation  of  surface  temperatures  and  heat  fluxes  for  the 
individual  structural  components  of  the  unit. 

5.  Calculation  of  the  resultant  heat  load  and  moisture  load  for 
the  unit. 

6.  Determination  of  ventilation  rates  at  hourly  intervals  based 
on  psychrometri c  and  physiological  data. 

7.  Determination  of  the  inside  dry-bulb  temperature  for  the 
confinement  unit. 

Each  of  these  sections  is  described  briefly  to  generally  describe 

the  very  detailed  flow  chart  (Appendix  A)  which  contains  all  the 
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Figure  1:  Simplified  flow  diagram  of  the  model 
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mathematical  relationships  and  algorithms  used.  The  source  program, 
presented  in  Appendix  B  with  a  definition  of  the  variable  names  in 
Appendix  C,  is  coded  in  Fortran  IV  for  computer  simulation. 

3.1  Solar  Parameters. 

Solar  simulation  should  be  considered  in  building  environmental 
systems  design  although  in  some  cases  it  may  be  an  insignificant 
factor  (103).  Kimura  and  Stephenson  (62)  state  that  solar  radiation 
is  one  of  the  most  important  components  of  the  heat  balance  at  the 
outside  surfaces  of  buildings,  and  that  solar  heat  which  enters  a 
building  through  the  windows  is  a  major  element  in  the  total  heat  gain 
by  the  building.  Hoglund  et  al  (57)  found  that  a  simple  method  of 
using  average  inside-to-outside  air  temperature  difference  to  calculate 
daily  average  heat  flow  gives  very  large  errors  because  solar  radiation 
is  neglected  entirely. 

Several  algorithms  (3,4,93,99)  are  combined  and  included  in  the 
model  to  determine  the  solar  position,  the  intensity  of  the  solar 
radiation  incident  on  the  outer  surfaces  of  the  building,  the  sol -air 
temperature  for  the  surfaces,  and  the  solar  heat  gain  factors  for  heat 
gain  through  the  windows  of  each  surface.  These  calculations  are 
carried  out  within  subroutine  SOLAR  (Appendix  A  and  B)  and  give  the 
accuracy  necessary  for  the  solar  effects  on  the  environmental  system 
(91,93).  The  definition  of  the  angles  that  are  presented  in  this 
subroutine  are  illustrated  in  Figure  2  (3). 

The  mathematical  relationships  used  in  SOLAR  calculations  are 
common  expressions  except  for  some  of  the  special  calculations.  The 
variables  related  to  solar  radiation  including  declination  angle, 
equation  of  time,  apparent  solar  constant,  atmospheric  extinction 
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coefficient  and  sky  diffuse  factor  are  expressed  in  a  truncated 
Fourier  series  form  to  avoid  interpolation  procedures  and  to  save 
computer  core  space  (3).  The  equations  for  calculation  of  the  cloud 
cover  modifier  for  each  combination  of  cloud  type,  total  cloud  amount, 
and  solar  altitude  angle  are  expressed  as  a  cubic  relationship  (3). 

The  transmission  and  absorption  factors  for  windows  are  expressed  as 
polynomials  developed  by  the  Division  of  Building  Research,  National 
Research  Council,  as  cited  by  several  sources  (3,4,93). 

3.2  Z-transfer  Function  Coefficients. 

Only  until  recently,  the  design  of  environmentally  controlled 
agricultural  buildings  for  production  of  livestock  and  poultry,  and  the 
storage  of  fruits  and  vegetables  has  been  based  largely  on  the  assumption 

9 

of  steady-state  heat  transfer.  To  predict  the  dynamic  thermal 
environment  within  total  confinement,  the  analysis  of  the  system  dictates 
design  based  on  transient  conditions  since  transient  heat  transfer  is 
the  actual  mode  of  heat  transfer  in  most  agricultural  buildings. 

The  periodic  heat  flow  in  homogeneous  and  composite  walls,  as  well 
as  the  concept  of  accounting  for  sol-air  temperature,  was  considered 
as  early  as  1944  (69,70).  Constant  inside  and  outside  temperatures 
were  assumed  in  these  cases.  Later* finite  differences  to  model  the 
transient  heat  transfer  through  walls,  ceilings  and  floor  were 
considered  (103). 

Jordan  and  Barwick  (58)  developed  an  analog  computer  solution  for 
transient  heat  transfer  through  composite  walls.  At  approximately  this 
same  time.  Mi  talas  and  Arseneault  (74)  developed  a  computer  program  to 
determine  the  response  factors  for  transient  heat  transfer  in  multi-layer 
slabs  as  used  by  Feddes  et  al  (39)  and  Jordan  et  al  (59). 
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Recently,  Mitalas  and  Arseneault  (75)  documented  a  program  used 
to  calculate  the  z-transfer  functions  (95)  for  the  calculation  of 
transient  heat  transfer  through  walls  and  roofs.  This  program,  which 
evaluates  the  z-transfer  functions  (pulse  transfer  functions)  that  are 
exact  for  either  a  unit  step  input,  a  ramp  type  input  or  a  periodic 
input  with  specified  harmonic  components,  is  incorporated  into  the 
model  of  the  thermal  environment  within  total  confinement  swine  housing. 

"The  use  of  z-transfer  functions  simplifies  the  calculation  of 
transient  heat  flow  through  composite  walls  and  roofs  without  requiring 
any  assumptions  except  that  the  process  can  be  described  by  linear 
differential  equations."  (95)  The  program  developed  by  Mitalas  and 
Arseneault  (75)  evaluates  the  set  of  Laplace  transfer  functions  that 
relate  temperature  and  heat  flux  at  any  plane  in  a  wall  to  boundary 
conditions  which  may  be  given  in  terms  of  surface  temperatures,  surface 
heat  fluxes,  or  temperature  at  one  surface  and  heat  flux  at  the  other. 
The  method  requires  finding  the  poles  of  the  Laplace  transfer  functions 
and  evaluating  the  residues  at  the  poles  for  walls  made  up  of  any 
number  of  layers  of  homogeneous  materials  (95). 

The  algorithms  used  to  calculate  the  z-transfer  function 
coefficients  Aq,  A-j  ,  ...»  Bq,  B^,  B^...,  Cq,  C-| ,  C ^  ...  and 

Dq,  D-j  ,  are  not  documented  in  detail  in  the  flow  chart  (Appendix  A), 
but  are  included  in  the  source  program  listing  of  subroutines  NAMEA1 , 
POLES,  MATRIX,  ORIGIN,  FREQRE,  POLYM  and  SOLVN  (Appendix  B).  A  detailed 
documentation  is  presented  by  Mitalas  and  Arseneault  (75). 

3.3  Attic  Space  Thermal  Resistance. 

The  algorithm  used  to  determine  the  thermal  resistance  of  the 
attic  space  in  a  pitched  roof  is  that  described  by  A.S.H.R.A.E.  (3)  for 
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computerized  calculations.  The  major  assumption  made  is  that  the 
space  can  be  equated  to  that  of  a  rectangular  cavity  with  a  height  of 
one-half  the  gable  height.  The  calculations  include  such  variables  as 
the  thickness  of  the  air  space,  the  direction  of  the  heat  flow,  the 
emissivity  of  the  surfaces  facing  the  air  cavity  and  the  space 
temperature . 

3.4  Surface  Temperatures  and  Heat  Fluxes. 

The  z-transforms  of  the  heat  fluxes  at  the  surfaces  for  a  wall  or 
roof  are  related  to  the  z-transforms  of  the  outer  and  inner  surface 
temperatures  resulting  in  the  general  equations  for  heat  flux  at  the 
inner  and  outer  surface  of  a  wall  or  roof  as  presented  in  the  flow 
chart  (Appendix  A)  (3).  If  the  coefficients  of  heat  transfer  at  the 
surfaces  are  known,  they  can  be  combined  with  the  wall  or  roof  z-transfer 
function  coefficients  to  give  a  set  of  over-all  factors  that  relate 
surface  fluxes  to  the  outside  and  inside  air  temperatures. 

Included  in  the  heat  balance  are  the  convection  and  radiation  at 
the  outside  surface  and  convection  at  the  inside  surface.  The  heat 
balance  equations  (39)  then  are  solved  simultaneously  in  the  model 
using  the  iterative  procedure  (73)  to  solve  for  the  outside  and  inside 
surface  temperatures . 

The  detailed  mathematical  calculations  for  these  procedures  are 
illustrated  in  subroutines  START  and  FLUX  (Appendix  A  and  B).  Subroutine 
START  performs  the  calculations  for  the  first  seven  hours  of  simulation 
when  the  surface  temperature  and  heat  flux  history  must  be  estimated 
prior  to  computation,  while  subroutine  FLUX  performs  these  calculations 
for  the  remaining  time  when  the  surface  temperatures  and  heat  fluxes 


are  known. 
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The  number  of  z-transfer  function  coefficients  for  a  certain 
slab  indicates  the  time  interval  in  which  each  surface  temperature  and 
heat  flux  would  have  an  effect  on  the  heat  transfer  of  the  slab.  This 
number  also  indicates  the  time  interval  required  to  start  the 
computations  in  advance  such  that  the  results  are  independent  of  the 
surface  temperatures  and  fluxes  which  were  estimated  prior  to  the 
computation  in  the  same  manner  as  the  response  factors  do  as  presented 

by  Stephenson  and  Mitlas  (94). 

Hoglund  et  al  (57)  conducted  a  study  in  which  the  thermal 
response  factor  method  of  calculating  heat  fluxes  and  surface 
temperatures  was  found  to  give  values  in  good  agreement  with  measured 
values  when  the  sol -air  temperature  included  the  effect  of  long-wave 
radiation  exchange  between  the  roof  and  sky.  As  z-transfer  functions 
give  results  similar  to  response  factors,  it  may  be  assumed  that 
accuracy  is  maintained. 

3.5  Resultant  Heat  and  Moisture  Load. 

In  order  to  establish  the  heat  available  to  warm  the  incoming  air 
such  that  the  moisture  may  be  removed  and  the  desired  indoor  temperature 
maintained,  the  total  heat  and  moisture  produced  within  the  unit  must 
be  determined  (2,4,35,36,64). 

The  heat  transfer  through  the  building  components,  the  supplemental 
heat  production  of  the  heater,  and  the  heat  production  of  the  animals 
are  the  source  of  heat  load,  while  the  moisture  production  of  the  animals 
and  surrounding  surfaces  are  the  source  of  moisture.  The  resultant  heat 
load  then  is  available  for  heating  the  exchange  air  and  vaporizing  excess 
moisture  within  the  facility. 

The  heat  transfer  through  the  building  components  (walls,  doors. 
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windows,  roofs  and  floor)  is  calculated  within  subroutine  WALL  while  the 
heat  and  moisture  production  of  the  animals  and  surrounding  wet  surfaces 
is  calculated  within  subroutine  HPROD  according  the  regression  equations 
presented  by  Bond  et  al  (16).  A  management  factor  also'is  incorporated 
for  specification  by  the  user  to  alter  the  sensible  heat  and  moisture 
production  of  the  animal  as  suggested  by  several  references  (2,4,50). 
Harman  et  al  (50)  suggested  that  the  water  vapor  produced  by  swine  on 
a  slatted  floor  that  must  be  removed  by  ventilation  (lagoon  underneath) 
is  0.42  that  on  a  concrete  floor.  One  of  the  major  short-comings  of 
these  results  is  that  the  experimental  units  were  not  similar  with 
regard  to  relative  humidity.  Furthermore,  water  vapor  produced  by  swine 
on  a  straw-bedded  floor  may  be  as  much  as  1.3  times  that  on  a  concrete 
floor  (2,4). 

The  assumption  used  for  predicting  heat  and  moisture  production 
is  considered  by  the  author  to  be  the  best  that  could  be  made  with  the 
data  available.  This  assumption  that  the  regression  equations  (16) 
apply  for  predicting  heat  and  moisture  production  of  swine  also  was 
utilized  by  Carson  (23)  with  a  fairly  high  degree  of  accuracy.  Other 
models  such  as  that  by  Beckett  and  Vidrine  (11)  could  be  used,  but 
many  of  the  assumptions  do  not  coincide  with  reality  and  are  much  too 
detailed  and  involved  for  inclusion  in  this  model.  The  output  also 
includes  the  heat  and  moisture  losses  for  one  square  foot  of  pig, leaving 
a  large  assumption  as  to  the  total  square  footage  of  pigs  confined. 

Many  input  parameters  such  as  pig  surface  temperature  and  forced 
convection  air  velocity  also  are  required,  whereas  an  attempt  was  made 
to  minimize  these  parameters  and  to  keep  the  model  as  general  as  possible 
for  ventilation  design  purposes. 
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3 .6  Psych rometri cs  and  Ventilation  Rate. 

The  psychrometri cs  are  calculated  according  to  several  algorithms 
for  inclusion  in  the  model  (2,4,99).  These  calculations  are  similar 
to  those  documented  by  Feddes  et  al  (39)  except  for  the  addition  of 
equations  for  calculation  of  the  enthalpy  of  air  and  the  calculation 
of  vapor  pressure  of  air  as  documented  in  the  detailed  flow  chart 
(Appendix  A).  The  calculations  for  enthalpy  are  those  given  by 
several  references  (4,60,96,99),  whereas  the  vapor  pressure  is  calculated 
according  to  the  formulas  given  by  Goff  as  cited  by  the  American  Society 
of  Heating,  Refrigerating  and  Air-conditioning  Engineers  (4)  for  vapor 
pressure  over  liquid  water  and  over  ice. 

Subroutine  PH20  determines  the  vapor  pressure  over  liquid  water 
while  subroutine  PICE  determines  the  vapor  pressure  over  ice  (Appendix 
A  and  B).  All  the  psychrometri cs  and  the  calculations  of  the  ventilation 
required  to  remove  heat  and  that  to  remove  moisture  are  presented  in 
subroutine  VENTIL. 

3.7  Inside  Dry-Bulb  Temperatures. 

The  inside  dry-bulb  temperatures  are  predicted  by  a  trialand 
error  procedure.  Initial ly, the  temperature  is  assumed  as  65°F  or  5°F 
higher  than  the  ingoing  dry-bulb  temperature,  whichever  is  greater. 

Given  this  inside  dry-bulb  temperature,  the  model  proceeds  through  all 
remaining  psychrometri c  calculations.  Finally,  the  calculated 
ventilation  rate  required  to  remove  the  heat  load  at  this  temperature 
is  compared  to  the  ventilation  rate  within  the  confinement  unit.  If 
the  error  in  ventilation  rate  calculation  is  within  the  allowable  error 
specified  by  the  user,  the  model  proceeds  to  the  next  hour. 
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When  the  percentage  error  in  ventilation  rate  calculation  is 
greater  than  the  maximum  desired,  the  temperature  is  altered  and  the 
thermal  characteristics  recalculated.  If  the  ventilation  rate  is 
greater  than  the  existing  ventilation  rate  within  the  building,  the 
inside  dry-bulb  temperature  is  increased;  whereas  with  a  calculated 
ventilation  rate  less  than  that  existing  within  the  unit,  the  inside 
dry-bulb  temperature  is  decreased. 

To  minimize  computer  time  in  the  tri al -and-error  procedure, 
several  algorithms  were  devised  for  incrementing  temperatures  as 
follows: 

1.  For  incoming  air  with  a  relative  humidity  of  less  than  50%, 
the  inside  dry-bulb  temperature  is  incremented  by  +  0.1°F. 

2.  For  inside  dry-bulb  temperature  greater  than  75°F,  the  inside 
dry-bulb  temperature  is  incremented  by  +  0 . 1 0 F. 

Whenever  these  two  conditions  are  not  met,  changes  in  inside  dry-bulb 
temperature  are  made  according  to  the  percentage  error  in  ventilation 
rate  calculations  according  to  the  following  algorithms: 

1.  For  error  greater  than  that  specified  as  acceptable  and 
less  than  15%,  temperature  is  incremented  by  +0.1 °F. 

2.  For  error  between  15%  and  25%,  temperature  is  incremented  by 
+0.2°F. 

3.  For  error  between  25%  and  50%,  temperature  is  incremented  by 
+  0.5°F. 

4.  For  error  between  50%  and  75%,  temperature  is  incremented  by 
+  1 . 5°F. 

5.  For  error  greater  than  75%,  temperature  is  incremented  by 
+  3.0°F. 
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As  mentioned  previously,  whenever  the  calculated  ventilation  rate 
required  to  remove  the  resultant  heat  load  is  within  the  accuracy 
specified  by  the  user,  the  model  proceeds  to  the  next  simulation  hour. 


4.  ASSUMPTIONS 


In  order  to  mathematically  describe  the  complex  dynamic  inter¬ 
action  of  the  animal  and  the  environment  so  that  a  computer  model  could 

be  prepared,  several  assumptions  were  made.  As  research  continues, 

some  of  these  assumptions  may  be  replaced  by  actual  data. 

The  following  are  the  major  assumptions  made  within  the  model: 

1.  The  air  temperature  within  the  confinement  unit  is  the  same 
floor  to  ceiling,  wall  to  wall  and  fan  inlet  to  fan  outlet. 

2.  The  moisture  content  within  the  confinement  unit  is  the  same 
floor  to  ceiling,  wall  to  wall  and  fan  inlet  to  fan  outlet. 

3.  There  is  no  heat  storage  within  the  equipment  and  other 
materials  within  the  confinement  unit. 

4.  Management  methods  for  reducing  moisture  production  and  altering 
sensible  heat  production  are  accounted  for  in  a  simple  management 
factor  for  sensible  heat  production  as  well  as  one  for  moisture 
production;  e.g.,  slatted  floor  versus  straw-bedding. 

5.  Sensible  heat  production  of  the  animal  is  influenced  only  by 
the  size  of  the  animal  and  by  the  surrounding  temperature, 
otherwise  sensible  heat  is  constant. 

6.  Latent  heat  production  of  the  animal  is  influenced  only  by  the 
size  of  the  animal  and  by  the  surrounding  temperature,  otherwise 
latent  heat  is  constant. 

7.  The  amount  of  any  additional  heat  load  due  to  lights,  motors, 
etc.  is  of  minor  importance. 

8.  Heat  loss  and  heat  gain  due  to  infiltration  are  of  minor 
i  mportance . 
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9.  There  is  no  difference  in  results  whether  the  ventilation  system 
uses  either  intake  or  exhaust  fans. 

10.  The  wind  direction  and  wind  speed  has  no  effect  on  the  building 
heat  exchange  or  on  the  effectiveness  of  the  ventilation  system. 

11.  All  structural  components  are  dry. 
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5.  PROGRAM  DATA 


Since  the  program  for  the  modelling  of  the  thermal  environment 
within  total  confinement  is  to  be  understood  by  all  those  wishing  to 
use  the  model,  a  detailed  explanation  of  the  input  and  output  data 
format  is  necessary. 

5.1  Input  Data. 

The  input  data  format,  adhering  to  conventional  format  for 
Fortran  IV  (28),  is  presented  in  Appendix  D  and  E.  Where  certain  data 
are  optional  these  are  indicated,  whereas  those  that  are  necessary  are 
defined  clearly. 

The  data  may  be  entered  on  cards  for  batch  processing,  or  entered 
on  line-file  and  stored  on  disk- file,  drum-file  or  magnetic  tape  for 
both  conversational  or  batch  processing.  One  should  note  that  the 
maximum  simulation  period  is  four  days  and  the  units  are  specified  in 
the  "English  System"  (Appendix  E).  Also,  one  should  note  that  where 
there  are  less  than  seven  component  orientations  and  less  than  four 
different  types  of  component  (i.e.  wall,  pitched  roof,  horizontal  roof 
and  doors),  'dummy1  or  artificial  variables  must  be  inserted.  This 
'dummy'  variable  is  usually  inserted  where  one  type  of  roof  does  not 
exist  (either  horizontal  or  pitched)  and  must  be  inserted  to  assure 
successful  computer  processing.  Eventually  this  complication  may  be 
overcome  by  altering  the  computer  program. 

5.2  Output  Data. 

The  computer  output  may  be  divided  into  four  basic  sets  of 

information  -  the  component  numerical  data,  solar  parameters  and 

thermal  properties,  heat  transfer  through  the  structural  components, 
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and  the  ventilation  criteria.  These  data  are  printed  in  the  normal 
digital  computer  format  requiring  a  minimum  character  length  of  135 
symbols  or  characters. 

5.2.1  Numerical  Component  Data. 

The  program  output  gives  the  numerical  data  for  each  component 
(wall,  roof  and  door)  including  the  layer  thickness,  feet;  layer 
conductivity,  BTU/(hr) (ft)^(°F)  per  foot  of  thickness;  layer  specific 
heat,  BTU/(lb)(°F) ;  layer  density,  ( 1 b ) / ( ft) ^ ;  layer  resistance,  °F/ 
(BTU)(hr)(ft  );  and  the  description  of  each  layer  of  the  component. 

The  overall  thermal  conductance,  BTU/(hr) (ft)^(°F) ,  of  the  component  is 
given  as  well  as  the  sampling  time  interval  and  the  z-transfer  function 
coefficients  calculated  for  each  component. 

5.2.2  Solar  Parameters  and  Thermal  Properties. 

For  each  component,  component  orientation  and  hour  of  each  day, 
a  summary  of  specific  solar  parameters  and  thermal  properties  are 
printed.  These  parameters  include: 

1.  clock  time,  hours  after  midnight; 

2.  solar  time,  hours  from  solar  noon; 

3.  solar  altitude,  degrees  above  horizontal; 

4.  solar  azimuth,  degrees  from  South; 

5.  direct  normal  intensity  of  solar  radiation  incident, 
BTU/(hr)(ft2); 

6.  intensity  of  the  direct  solar  radiation  incident  on  the 
outer  surface,  BTU/(hr)(ft^) ; 

7.  total  intensity  of  the  solar  radiation  on  the  outer  surface, 
BTU/(hr) (ft2) ; 
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8.  solar  heat  gain  factor  for  the  windows; 

9.  sol-air  temperature  of  the  outer  surface,  °F; 

10.  outside  dry-bulb  temperature,  °F; 

11.  outside  wet-bulb  temperature,  °F; 

12.  longwave  radiation  at  the  outer  surface,  BTU/(hr) (ft2) ; 

13.  short  wave  radiation  at  the  outer  surface,  BTU/(hr)(ft2) ; 

O 

14.  convection  at  the  outer  surface,  BTU/(hr)(ft  ); 

15.  heat  flux  at  the  outer  surface,  BTU/(hr) (ft^) ; 

16.  heat  flux  at  the  inner  surface,  BTU/(hr) (ft^) ; 

17.  convection  at  the  inner  surface,  BTU/(hr) (ft  ) ; 

18.  surface  temperature  of  the  inner  surface,  °F; 

19.  surface  temperature  of  the  outer  surface,  °F,;  and 

20.  inside  dry-bulb  temperature,  °F. 

Where  the  building  component  in  question  is  a  'dummy'  or  an 
artificial,  a  tableau  is  printed  giving  the  output  parameters  for  the 
artificial  component.  The  insertion  of  zero  for  the  area  of  this 
component  prevents  the  heat  transfer  through  the  component  from  being 
added  to  the  total  heat  load  within  the  building.  Therefore,  the 
temperature  and  psych rome trie  calculations  are  not  affected  by  this 
'dummy'  or  artificial  variable. 

5.2.3  Heat  Transfer. 

The  heat  flow,  BTU/hr,  for  each  hour  of  the  simulation  period  is 
printed  for  the  walls,  doors,  floor,  horizontal  roof  (no  attic  space), 
pitched  roof  and  windows  as  well  as  the  total  heat  flow  through  all  the 
building  components.  Positive  values  indicate  heat  flow  into  the 
building,  while  negative  values  indicate  heat  flow  outward. 
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5.2.4  Ventilation  Criteria. 


The  following  hourly  ventilation  criteria  are  printed  for  th 

total  confinement  unit; 

1.  existing  ventilation  rate  within  the  confinement  unit,  cfm; 

2.  ventilation  rate  required  to  remove  moisture  at  relative 
humidity  specified  by  the  user,  cfm; 

3.  relative  humidity  assumed  for  optimal  moisture  removal  as 
specified  by  the  user,  percent; 

4.  ventilation  rate  required  to  remove  the  resultant  heat  load, 
cfm; 

5.  relative  humidity  at  the  ventilation  rate  required  to 
remove  the  resultant  heat  load,  percent; 

6.  supplemental  heat  or  refrigeration  required  to  ensure  a 
ventilation  rate  required  to  remove  moisture,  BTU/hr; 

7.  total  sensible  heat  load  within  the  building,  BTU/hr; 

8.  total  sensible  heat  produced  by  the  animals  and  the  heater, 
BTU/hr; 

9.  incoming  dry-bulb  temperature,  °F; 

10.  inside  dry-bulb  temperature,  °F; 

11.  incoming  wet-bulb  temperature,  °F; 

12.  moisture  production  within  the  building,  Ibs/hr;  and 

13.  relative  humidity  of  the  incoming  air,  percent. 
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6.  VALIDATION  OF  THE  MODEL 

In  the  course  of  simulation,  confirmation  of  the  model  through 
appropriate  comparisons  with  experimentally  derived  data  is  essential 
to  predict  the  reliability  and  accuracy  of  the  model  in  predicting  the 
dynamic  thermal  characteristics  within  total  confinement. 

6.1  The  Total  Confinement  Unit. 

The  total  confinement  unit  (Figure  3  and  Figure  4)  used  for  the 
verification  of  the  model  was  chosen  on  the  basis  of  a  unit  that  would 
represent  a  typical  commercial  farm  operation.  The  Swine  Finishing  Barn 
located  at  the  University  of  Alberta,  Faculty  of  Agriculture  and 
Forestry  Edmonton  Research  Station,  Edmonton,  Alberta,  was  used  to 
represent  the  typical  swine  unit.  This  facility  was  constructed  in  the 
early  1950's  by  a  local  p re -fabrication  company  for  research  activities 
of  the  Department  of  Animal  Science. 

The  building  was  68  feet  2  inches  long  by  36  feet  8  inches  wide 
by  6  feet  4  inches  to  the  eaves  and  orientated  with  its  long  axis 
running  north-south.  The  frame  walls  of  the  structure  consisted  of 
0.032  inch  aluminum  exterior  siding  and  two  3/8-inch  plywood  sheathing 
skins  with  2-inch  batt  insulation.  The  roof,  with  a  7:20  slope, 
consisted  of  3/8-inch  plywood  lining  with  2-inch  batt  insulation  in  the 
false  ceiling,  the  attic  space  and  3/8-inch  plywood  decking  with 
asphalt  shingled  roofing.  Double-glazed  windows  were  located  in  the 
east  and  west  walls,  involving  41  square  feet  in  each  case.  The  door 
located  on  the  north  gable  end  of  the  unit  consisting  of  two  3/8-inch 
plywood  sheathing  skins,  insulated  with  1  1 /2-inch  batt  insulation, 
involved  24  square  feet,  while  the  doors;  located  on  the  south  gable  end 
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Figure  3:  Outside  view  of  experimental  confinement  unit. 


Figure  4 


Inside  view  of  experimental  confinement  unit 
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of  the  unit  (Figure  5)  involved  99  square  feet  of  similar  construction. 

6 .2  Model  Parameters. 

This  study  was  conducted  from  7:00  p.m.  September  10,  1973,  to 
10:00  p.m.,  September  12,  1973,  to  determine  the  parameters  required 
as  input  into  the  computer  model  as  well  as  to  determine  certain 
parameters  necessary  for  evaluation  of  the  accuracy  of  the  prediction 
model.  Initially,  the  intention  of  the  author  was  to  begin  on 
September  10  and  run  through  to  September  14,  obtaining  four 
consecutive  days  of  data;  but,  due  to  experimental  failure  on 
September  12,  1973,  the  data  that  was  collected  for  50  hours  of 
successful  operation  was  used. 

6.2.1  Ventilation  Rate. 

Ventilation  of  the  swine  unit  was  by  means  of  an  exhaust  system 
where  the  air  was  expelled  by  a  12-inch  and  a  16-inch  constant  speed 
fan  located  on  the  east  wall  of  the  building.  The  air  was  drawn 
through  the  attic  space  by  means  of  slots  in  the  ceiling  along  the  east 
and  west  walls. 

Discharge  ducts  with  suitable  calming  lengths  and  strai ghteners 
(60)  (Figure  6)  were  constructed  to  stabilize  the  velocity  pattern. 
Velocity  probes  (Figure  7),  connected  to  a  Hastings  velocity  meter 
(Figure  8),  then  were  connected  directly  into  a  Honeywell  16-point 
millivolt  recorder  located  at  the  south  end  of  the  facility. 

The  millivolt  reading,  as  recorded  by  the  chart  recorder,  was 
calibrated  by  measuring  the  velocity  pressure  within  the  discharge  ducts 
down-stream  from  the  fan  using  a  manometer  connected  to  a  pitot  static 
tube.  The  method  used  to  determine  the  ventilation  rate  from  the 
velocity  pressure  was  as  described  by  Jorgenson  (60).  The  cross-section 
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Figure  5:  South  gable  end  of  experimental  confinement  unit. 


Figure  6:  Discharge  ducts. 
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Figure  7:  Velocity  probe  located  in  discharge  duct. 


Figure  8:  Velocity  meter  used  to  measure  air  flow. 
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of  the  discharge  duct  was  divided  into  25  rectangles  and  the  velocity 
pressure  measured  at  the  centre  of  each  according  to  procedures 
outlined  (60).  Since  the  speed  of  the  fans  could  not  be  varied,  this 
procedure  was  carried  out  several  times  before  the  trial  run  to 
determine  the  maximum  range  over  which  the  ventilation  rate  varied. 

This  range  was  found  to  be  2900  cfm  to  3100  cfm.  Since  the  reading  on 
the  chart  recorder  fluctuated  well  within  this  range  throughout  the 
trial  and  since  the  accuracy  of  the  manometer  was  rated  at  +100  cfm, 
the  ventilation  rate  provided  was  assumed  as  3000  cfm,  +  3%. 

6.2.2  Temperature  and  Relative  Humidity. 

A  total  of  102  copper-constantan  (16  gauge)  thermocouples  were 
used  for  temperature  measurements.  Some  of  the  thermocouples  were 
wired  directly  into  a  Honeywell  24-point  temperature  recorder  located 
at  the  south  end  of  the  building  (Figure  9),  while  others  were  connected 
in  parallel  and  then  wired  into  the  temperature  recorder.  The 
temperature  recorder  then  ran  continuously  giving  approximately  ten 
readings  for  each  temperature  per  hour.  Failure  of  the  temperature 
recording  equipment;  i.e.,  failure  of  the  mechanical  chopper  (DC  to  AC 
converter),  terminated  further  readings  past  10:00  p.m.,  September  12, 
1973.  Error  may  have  been  introduced  before  mechanical  failure  had 
been  detected,  but  the  recorder  was  not  considered  faulty  before  this 
time. 

Where  ambient  temperatures  were  required  for  the  inside  conditions, 
outside  conditions  and  attic  conditions,  the  thermocouples  were  located 
in  pairs  (Figure  10).  One  of  these  thermocouples  measured  the  dry-bulb 
temperature,  while  the  other  measured  the  wet-bulb  temperature.  The 
wet-bulb  thermocouple  lead  was  covered  with  a  wet  wick  which  extended 


' '  ' 

. 


i  •«  >/  b  >  ■  n.  r  ,fT 


. 1 

j  /  '  ‘  /!  \:  ■  :•  if!-  -V 


39 


Figure  9:  Temperature  recorder. 


Figure  10:  A  thermocouple  pair  used  to  measure  wet-bulb  and 
dry-bulb  temperatures. 
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into  a  water  bath.  These  wicks  were  serviced  daily  because  of  the 
prevailing  dusty  conditions  to  reduce  the  wet-bulb  temperature  error 
(4,12,38,50).  Each  thermocouple  circuit  was  calibrated  using  an  ice 
bath  as  the  standard  reference. 

Throughout  the  trial,  40  temperature  readings  were  taken  with 
a  sling  psychrometer  to  check  the  dry-and  wet-bulb  thermocouples. 

The  deviation  of  the  dry-bulb  thermocouple  temperatures  was  in  the  range 
of  -0.7°F  to  +1.6°F  with  a  mean  deviation  of  +0.2°F  from  those  taken  by 
the  sling  psychrometer .  Deviation  of  the  wet-bulb  thermocouple  temper¬ 
atures  recorded  was  in  the  range  of  +0.4°F  to  4.4°F  with  a  mean  deviation 
of  +2.7°F  from  those  taken  with  the  sling  psychrometer.  The  wet-bulb 
temperatures  recorded  were  above  the  psychrometer  wet-bulb  temperature, 
a  finding  also  noted  by  Harman  et  al  (50).  This  large  wet-bulb  error 
most  probably  was  due  largely  to  low  air  velocities.  An  air  velocity 
of  500  fpm  to  1000  fpm  (4,12,60,99)  is  required  for  sufficient 
evaporative  cooling  to  produce  a  wet-bulb  temperature  approximately 
equal  to  the  thermodynamic  wet-bulb  temperature. 

The  recorded  temperatures  of  each  channel  then  were  divided  into 
hourly  groups  and  the  mean  temperature  of  each  group  was  used  as  the 
temperature  for  the  time  represented.  For  example,  the  mean  temperature 
for  channel  1  from  7:31  p.m.  to  8:30  p.m.  was  used  to  represent  the 
temperature  for  8:00  p.m.  The  wet-bulb  temperatures  were  corrected  by 
subtracting  2.7°F  from  the  recorded  values. 

6 . 2 . 2 . 1  Inside  Room  Temperature  and  Relative  Humidity. 

Inside  room  dry-bulb  temperatures  were  monitored  to  evaluate 
the  accuracy  with  which  the  model  predicted  these  temperatures.  Six 
dry-bulb  thermocouples  were  connected  in  parallel  and  distributed 
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within  the  building  as  per  Figure  11  and  placed  half  the  distance 
between  the  floor  and  ceiling  to  give  an  average  inside  dry-bulb 
temperature.  Care  was  taken  to  keep  the  resistance  of  the  parallel 
circuits  equal  (4).  As  well  as  this  parallel  circuit  that  recorded 
the  inside  dry-bulb  temperature,  a  dry-bulb  thermocouple,  located  at 
each  of  the  two  exhaust  fans,  was  connected  directly  into  the 
temperature  recorder.  The  temperatures  recorded  by  each  of  these  three 
circuits  (i.e.  inside  average,  parallel  circuit,  12"  and  16"  fans)  are 

*  "k 

represented  in  Figure  12  as  well  as  in  Appendix  G  . 

The  temperatures  recorded  by  the  thermocouples  connected  in 
parallel  were  used  as  the  inside  dry-bulb  temperature  since  they 
represented  the  average  inside  dry-bulb  temperature  better  than  either 
the  thermocouple  at  the  16-inch  fan  or  the  12-inch  fan  (as  noted  by 
temperature  measurement  with  the  sling  psychrometer) .  The  tenperatures 
recorded  at  the  16-inch  fan  deviated  drastically  from  the  inside 
average  dry-bulb  temperature  especially  when  doors  or  windows  were 
opened.  Between  hours  22  and  30,  a  window  on  the  west  side  of  the 
building  blew  open  due  to  stormy  conditions  with  winds  gusting  to  54 
miles  per  hour.  This  caused  the  temperature  sensed  at  the  16-inch 
fan  to  rise  significantly.  Temperatures  within  the  building  deviated 
as  much  as  +_6°F  from  wall  to  wall  and/or  ceiling  to  floor  within  the 
Piggery. 

*  Note:  The  time  for  most  figures  and  graphs  is  given  as  hours  1  to 
72  inclusive.  Time  begins  at  1:00  a.m.  Septenber  10,  1973  represented 
by  hour  1  and  continues  to  midnight,  September  12,  1973  represented  by 
hour  72  (See  Appendix  F). 
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Figure  12:  Experimental  inside  room  dry-bulb  temperatures. 
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As  mentioned  previously,  a  wet-bulb  thermocouple  was  paired  with 
the  dry-bulb  thermocouple  to  monitor  the  inside  ambient  wet-bulb 
temperature.  These  temperatures  then  were  used  in  conjunction  with  the 
inside  dry-bulb  temperatures  to  determine  the  inside  relative  humidity 
according  to  the  algorithm  presented  in  Appendix  H. 

Since  the  dry-bulb  temperatures  recorded  by  the  parallel  circuit 
were  used  to  represent  the  dry-bulb  temperature,  the  wet-bulb 
thermocouple  temperatures  measured  by  the  parallel  circuit  were  also 
used.  The  inside  relative  humidity  recorded  is  presented  in  Appendix  G. 
6. 2. 2. 2  Outside  and  Attic  Temperature  and  Relative  Humidity. 

The  outside  dry-bulb  and  wet-bulb  temperatures  as  well  as  the 
attic  dry-bulb  and  wet-bulb  temperatures  were  required  as  input 
parameters  to  the  model  depending  on  which  was  assumed  as  the  incoming 
or  entering  air  for  the  ventilation  of  the  confinement  unit.  The  attic 
dry-bulb  temperature  was  measured  with  six  thermocouples  connected  in 
parallel  and  distributed  evenly  within  the  attic.  The  attic  wet-bulb 
temperature  was  measured  in  the  same  manner  with  a  parallel  circuit. 

The  outside  wet-bulb  and  dry-bulb  temperatures  were  measured  by  a  pair 
of  single  thermocouples  connected  directly  into  the  temperature  recorder. 
These  outside  thermocouples  were  placed  in  a  white  shelter  (Figure  13), 
approximately  five  feet  off  the  ground,  to  minimize  effects  of 
radiation  (4,12,91). 

The  relative  humidity  within  each  region  was  calculated  in  the 
same  manner  as  the  inside  relative  humidity.  The  dry-bulb  temperatures 
for  the  attic  and  outside  air  and  the  relative  humidity  of  the  attic 
and  outside  air  are  presented  in  Figure  15  and  Figure  16  as  well  as  in 
Appendix  G. 
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Figure  14:  Thermocouple  taped  to  wall  surface. 
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Figure  15:  Attic  and  outside  dry-bulb  temperatures. 
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Figure  16:  Attic  and  outside  relative  humidities. 
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6. 2. 2. 3  Surface  Temperature. 

Both  inside  and  outside  surface  temperatures  were  recorded 
for  the  four  side  walls  of  the  facility  as  well  as  the  inside  surface 
temperature  of  the  false  ceiling  and  the  outside  surface  of  the  east  and 
west  sloped  portions  of  the  roof.  These  temperatures  are  illustrated 
in  subsequent  sections  in  conjunction  with  those  temperatures  predicted 
by  the  model;  the  data  also  may  be  noted  in  Appendix  G. 

Each  of  the  surface  temperatures  was  measured  by  six  thermocouples 
connected  in  parallel  to  give  the  overall  average  surface  temperature 
of  the  component.  These  thermocouples  were  attached  by  means  of  water¬ 
proof  tape  (Figure  14)  whose  color  was  chosen  to  match  the  color  of  the 
surface  as  closely  as  possible  (4,91). 

6.2.3  Other  Weather  Data. 

Additional  weather  data  were  obtained  from  the  local  Weather 
Office  located  at  the  Edmonton  Industrial  Airport,  Edmonton,  Alberta, 
for  each  hour  from  September  10,  1973, to  September  12,  1973.  The  data 
included  barometric  pressure,  wind  direction,  wind  speed,  station 
pressure,  cloud  type  and  total  cloud  amount. 

The  wind  direction  and  wind  speed  readings  were  obtained  for  use 
in  the  analyses  of  the  model  verification  to  determine  whether  large 
discrepancies  could  be  related  to  the  wind  condition.  The  wind  direction 
was  measured  in  degrees  east  of  true  north  while  the  wind  speed  was 
recorded  in  miles  per  hour  (Appendix  G). 

The  station  barometric  pressure,  given  in  millibars,  was  converted 
to  inches  of  mercury  using  the  conversion  of  one  bar  equal  to  29.53 
inches  of  mercury  (4,41).  These  measurements  were  then  corrected  for 
the  elevation  and  temperature  of  the  facility  (60).  The  corrected 
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readings,  as  presented  in  Appendix  G,  then  were  used  as  input  to  the 
computer  model . 

The  cloud  type  and  total  cloud  amount  (Appendix  G)  were  required 
as  input  parameters  to  the  model.  The  total  cloud  amount  was  presented 
on  a  scale  of  0  to  10  as  obtained  from  the  Weather  Station,  zero 
representing  no  cloud  cover  and  10  representing  total  cloud  cover.  The 
cloud  type  was  specified  for  the  lowest  layer  of  clouds  as  this  cloud 
layer  appeared  to  represent  the  largest  proportion  of  the  total  cloud 
cover. 

6.2.4  Heat  and  Moisture  Production. 

A  heater  located  at  the  northwest  corner  of  the  facility  provided 
the  supplemental  heat  for  air-conditioning  of  the  confinement  unit.  The 
heat  output  of  this  heater,  with  a  rated  net  total  heat  capacity  of 
122,000  British  Thermal  Units  per  hour,  was  monitored  by  a  mechanical 
service  recorder  which  was  sensitive  to  vibration.  The  recorder  was 
mounted  on  the  back  of  the  furnace  (Figure  17)  Where  maximum  vibration 
of  fan  movement  was  detected.  Prior  to  the  trial,  the  pendulum  movement 
of  the  service  recorder  (i.e.  fan  movement)  was  calibrated  against  the 
actual  heater  operation.  This  established  that  the  heater  operated 
for  an  average  of  two  minutes  less  than  the  fan  operated.  Using  the 
pendulum  movement  and  the  net  heater  output,  the  heat  output  per  hour 
was  determined.  The  heater  did  not  commence  operation  until  hour  68, 
at  which  time  16,000  British  Thermal  Units  of  heat  were  added  to  the 
facility  per  hour. 

To  estimate  the  heat  and  moisture  output  of  the  animals  and 
surroundings,  the  number  of  animals  and  their  weights  were  required  for 
the  applicable  regression  equations.  A  total  of  99  swine  were  confined 
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Figure  17:  Service  recorder  mounted  on  heater  unit. 
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and  distributed  within  the  building  as  per  Figure  11.  The  individual 
weights  of  the  animals  were  as  presented  in  Appendix  G.  These  animals 
were  weighed  on  September  10,  1973, before  the  trial  commenced. 

6-2.5  Physical  Data  of  Structural  Components. 

The  physical  data  required  as  input  for  the  model  included 
thickness,  conductivity,  density,  specific  heat  and  resistance  of  the 
radiation  path  whenever  applicable  (thermal  resistance  when  there  was 
negligible  heat  storage)  for  all  layers  of  each  structural  component. 

As  mentioned  previously,  the  structural  components  included  the 

following  layers:  aluminum  siding,  plywood,  batt  insulation,  air  and 
asphalt  shingles. 

The  data  for  each  layer  of  each  structural  component  were  obtained 
from  numerous  references  (2,3,4,19,40,60,96,99,102).  There  was  an 
appreciable  variation  between  different  sources  as  to  the  specific 
applicable  values;  these  deviations  are  considered  in  the  sensitivity 
analysis.  In  all  cases  the  individual  layers  were  inspected  and  a 
value  that  would  best  represent  the  material  was  assumed.  The  data 
from  the  manufacturers  were  not  available  while  the  techniques  to 
determine  these  values  were  very  detailed  and  expensive. 

The  thermal  data  for  aluminum  siding  over  a  flat  surface  (plywood 
sheathing)  varied  widely  depending  upon  the  amount  of  ventilation  of 
the  air  space  beneath  the  siding,  whether  the  air  space  is  reflective 
or  n on-ref lecti ve ,  and  upon  the  thickness,  type  and  application  of 
insulating  backing-board  used.  The  0.0027-foot  thick  siding  (measured 
by  micrometer)  was  assumed  to  have  a  thermal  conductivity  of  128  BTU/ 
(hr)(ft2)  (°F)  per  foot  of  thickness, a  density  of  171  lb/ft3,  and  a  specific 
heat  of  0.214  BTU/( lb) (°F) .  Departures  of  +50  percent,  or  more,  from 
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the  values  assumed  may  occur  (4). 

The  3/8-inch  (0.0313  ft)  plywood  sheathing  was  assumed  to  have  a 
thermal  conductivity  of  0.066  BTU/(hr) ( ft2) (°F)  per  foot  of  thickness, 
a  density  of  34  lb/ft3  and  a  specific  heat  of  0.29  BTU/(lb) (°F) . 

These  values  did  not  differ  between  the  reference  sources  used  to  any 
extent;  however, moisture  content,  age  and  type  of  material  could 
influence  the  specific  physical  parameters. 

For  the  2-inch  and  the  1  1/2-inch  (0.1667  ft  and  0.125  ft)  batt 
insulation,  stated  values  may  have  deviated  from  those  assumed  by  +50 
percent,  depending  again  on  moisture  content,  age  and  type  of  material. 
After  close  inspection,  the  values  assumed  were  a  thermal  conductivity 
of  0.022  BTU/(hr) ( ft2) (°F)  per  foot  of  thickness,  a  density  of  3.25  lb/ft3 
and  a  specific  heat  of  0.18  BTU/( lb) (°F) . 

The  asphalt  shingles,  with  an  average  thickness  of  0.0217  feet, 
were  assumed  to  have  a  thermal  conductivity  of  0.43  BTU/(hr)(ft2)(°F) 

3 

per  foot  of  thickness,  a  density  of  70  lb/ft  and  a  specific  heat  of 
0.22  BTU/( lb) (°F) .  These  values  might  deviate  from  the  assumed  values 
by  +  50%  depending  on  the  age  and  type  of  material  considered. 

The  thermal  resistance  of  the  air  space  within  walls  was  assumed 

o  2 

as  0.85°F/BTU/(hr) (ft  )  per  foot  of  thickness.  All  reference  sources 
were  within  +  5%  of  this  resistance  value. 

6.2.6  Other  Parameters. 

There  were  a  number  of  parameters  necessary  as  input  data 
(Appendix  D  and  E)  which  had  to  be  determined.  Several  references 
(2,3,4,8,36,50,60,93,96,99)  were  used  to  determine  these  values.  The 
departure  from  the  assumed  values  for  many  of  these  data  were  fairly 
large,  but  after  considering  the  variations  associated  with  each,  a 
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value  was  assumed  using  best  judgement.  The  deviations  are  considered 
later  in  the  sensitivity  analysis. 

The  emissivity  and  absorptivity  factors  for  all  the  outer 
surfaces  as  well  as  those  for  the  attic  surfaces  were  required.  As 
the  outer  surfaces  of  all  the  walls  were  a  cream-colored  paint,  the 
emissivity  factor  was  assumed  to  be  0.92  and  the  absorptivity  value 
to  be  0.40.  The  asphalt  shingles  were  assumed  to  have  an  emissivity 
factor  of  0.93  and  an  absorptivity  factor  of  0.82.  The  upper  attic 
surface,  composed  of  plywood  sheathing,  was  assumed  to  have  an 
emissivity  factor  of  0.90  while  the  lower  attic  surface,  paper  cover 
on  the  batt  insulation,  was  assumed  to  have  an  emissivity  *  factor  of 
0.92. 

The  thickness  of  the  attic  space  was  determined  as  39  inches 
(one-half  the  gable  height). 

The  windows  located  on  the  east  and  west  walls  of  the  building 
were  1 /8-inch  double-glazed  sheets  with  polynomial  coefficients  for 
calculation  of  absorptance  and  transmittance  as  given  in  Appendix  G. 

The  overall  heat  transfer  coefficient  for  these  windows  was  assumed  as 
0.66,  with  a  variation  from  this  value  due  to  wind  speed  effects  on 
the  individual  air  film  coefficients  for  heat  transfer  by  convection 
and  radiation.  The  inward-flowing  fraction  of  the  radiation  absorbed  by 
the  inner  window-pane  and  that  by  the  outer  window-pane  were  calculated 
according  to  procedures  outlined  in  Appendix  H. 

The  heat  transfer  coefficients  for  the  outer  air  film,  inner  air 
film  and  the  air  film  within  the  double-glazed  sheets  can  vary  with 
varying  forced  air  motion  caused  by  wind  on  the  outdoor  surface,  air 
induction  devices  or  fans  at  the  indoor  surface,  and  the  direction  of 


' 


bsn  r  n  M'  ^  olJ  Jf.  ,  U 

i 

■ 


awobmrw  eesriJ  *»tft 


m  ...  in t  *w.  ?  r 


53 


air  movement.  For  still  air  conditions,  a  value  of  1.46  BTU/(hr)(ft2) 
(°F)  was  assumed  for  a  vertical  air  film.  This  value  can  rise  to  as 
high  as  3.0  when  forced  convection  is  produced  by  fans,  induction  units, 
etc.  The  value  for  a  horizontal  film  (air  movement  upwards)  was  assumed 
as  1.63,  a  horizontal  film  (air  movement  downwards)  as  1.08,  an  air  film 
at  45  degrees  (air  movement  upward)  as  1.60,  and  air  film  at  45  degrees 
(air  movement  downward)  as  1.32.  For  outside  surfaces,  the  heat 
transfer  coefficient  was  assumed  as  4.0  for  summer  conditions  (wind  of 
7.5  mph) . 

The  shading  coefficient  for  the  windows  was  assumed  as  0.90.  As 
for  the  clearness  number,  the  range  for  industrial  areas  is  0.7  to  0.9 
depending  on  the  type  of  industry,  while  for  non-industrial  areas  this 
variable  may  be  as  high  as  1.1.  As  the  area  in  which  the  experimental 
facility  was  located  is  non-industrial,  but  still  within  city  limits, 
the  clearness  number  was  assumed  as  1.0. 

The  ground  reflectivity  was  assumed  as  0.2,  this  value  being 
considered  as  representing  the  conditions  at  the  time.  The  value  for 
a/hQ  (a  equals  the  absorptance  of  the  surface  for  solar  radiation  and 
hQ  equals  the  coefficient  of  heat  transfer  by  radiation  and  convection 
at  the  outer  surface)  was  assumed  as  0.15  for  light-colored  surfaces 
as  suggested  by  several  of  the  reference  sources  mentioned  above.  The 
same  sources  noted  that  0.30  represents  the  maximum  value  that  is  likely 
to  occur  for  this  parameter. 

In  addition  to  these  assumed  parameters,  the  intensity  of  solar 
radiation  was  measured  by  a  pair  of  pyrheliometers  (91,99);  one 
(Figure  18)  measured  the  direct  radiation  normal  to  the  sun's  rays ,  while 
the  other  (Figure  19)  measured  the  total  horizontal  radiation.  The 
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Figure  18:  Pyreliometer  to  measure  the  direct  normal 
radi ati on. 


Figure  19:  Pyreliometer  to  measure  the  radiation  on  a 
horizontal  plane. 
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direct  normal  pyrheligmeter  was  connected  to  a  digital  voltmeter  and 
readings  taken  manually,  while  the  horizontal  pyrheliometer  was  connected 
directly  into  the  millivolt  recorder. 

6.3  The  Computer  Simulation. 

The  validation  simulation  trial  was  conducted  between  September 
10,  1973  and  September  12,  1973;  therefore,  the  simulation  period  was 
three  days  (72  hours).  As  mentioned  previously  most  of  the  parameters 
associated  with  the  model  were  collected  for  50  hours  (hour  20  to 
hour  69),  but  since  the  model  must  begin  at  1:00  a.m.,  the  complete 
three  days  were  simulated  by  the  computer  model.  This  required 
assumptions  for  temperature  for  the  time  when  they  were  not  determined 
experimentally.  These  were  determined  by  using  the  temperatures  at  the 
Edmonton  Weather  Station. 

The  swine  finishing  barn  used  as  the  experimental  total 
confinement  unit  was  ventilated  for  removal  of  the  heat  load  with 
thermostatic  controls  for  temperature  maintenance.  To  determine  the 
ventilation  rate  for  optimal  moisture  removal,  70  percent  relative 
humidity  was  assumed  (8).  The  simulation  model  maintained  the 
ventilation  rate  required  to  remove  the  resultant  heat  load  within 
jt  3  percent  specified  by  the  author  as  the  accuracy  required. 

The  outside  temperature  was  assumed  to  be  the  temperature  of 
the  incoming  or  entering  air  for  ventilation  purposes.  The  location 
of  Edmonton  is  53.34  degrees  North  latitude  and  113.31  degrees 
West  longitude.  Edmonton's  time  zone  number  is  seven  and,  during  the 
month  of  September,  the  city  is  under  daylight  saving  time. 

The  surface  tilt  and  azimuth  angles  were  checked  by  the  surveying 
crew  of  the  Physical  Plant  Department,  University  of  Alberta.  The 
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building  azimuth  was  found  to  be  within  1%  of  north-south  while  the 
surface  tilt  of  the  walls  was  within  1%  of  being  vertical. 

Most  of  the  work  involved  with  the  computer  was  performed  in 
conversational  mode  from  an  IBM  Model  2741  communication  terminal  using 
disk-file  and  magnetic  tape.  The  input  data  collected  then  was  modified 
according  to  input  requirements  (Appendix  D  and  E)  and  prepared  in  the 
proper  format  as  presented  in  Appendix  I.  The  program  then  was  processed 
using  a  Fortran  G  compiler  on  an  IBM  System  360  Model  67  dual -processor 
computer  using  Virtual  Memory  facilities  and  the  Michigan  Terminal 
System  at  the  University  of  Alberta  Computing  Centre.  The  output  is 
presented  in  Appendix  J  in  the  format  discussed  previously.  The  computer 

time  and  costs  are  presented  in  Appendix  K  for  the  three-day  simulation 
period. 
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7.  DISCUSSION  OF  THE  VALIDATION  RESULTS 


7.1  Initial  Validation. 

Initially,  the  heat  blanace  equations  were  solved  simultaneously 
using  the  outside  temperature  to  represent  the  outside  conditions  as 
outlined  by  Mitalas  (73).  The  results  using  this  method  are  referred 
to  as  Model  A  (Appendix  J)  throughout  the  remaining  discussion. 

The  American  Society  of  Heating,  Refrigerating  and  Air-condition¬ 
ing  Engineers  (4)  stated  that  the  transfer  function  approach  as  used  in 
this  model  is  particularly  well  suited  for  using  the  sol -air  temperature 
to  represent  outside  conditions.  For  this  reason,  the  model  was  altered 
slightly  to  use  the  sol-air  temperature  to  represent  outdoor  conditions, 
still  using  the  heat  balance  equations  which  included  convection  and 
radiation  at  each  surface.  The  results  using  this  method  are  referred 
to  as  Model  B  throughout  the  remaining  discussion.  This  method  is  not 
entirely  correct  because  the  sol-air  temperature  is  the  temperature  of 
the  outdoor  air  which,  in  absence  of  all  radiation  exchanges,  would 
give  the  same  rate  of  heat  entry  into  the  surface  as  would  exist  with 
the  actual  combination  of  incident  solar  radiation,  radiant  energy 
exchange  with  the  sky  and  other  outdoor  surroundings,  and  convective 
heat  exchange  with  the  outdoor  air.  To  make  the  changes  necessary  to 
accurately  include  sol-air  temperature,  the  heat  balance  equations 
would  have  required  major  modifications.  These  modifications  were  not 
made,  even  though  sol-air  temperature  was  used  to  represent  the  outside 
conditions  in  Model  B,  but  Model  B  was  included  to  illustrate  the 
magnitude  of  the  effect  of  using  sol -air  temperature. 


-  57  - 


lav  r,,.  y  :  o  >?.  /Mf  id  lb  ri  a ftt  ui  ^ 


-ncr^ /bnoD 


- 


. 


■ 


58 

7.1.1  Numerical  Component  Data. 

The  physical  data  were  the  same  for  both  Model  A  and  Model  B 
as  presented  for  Model  A  in  the  sample  output  (Appendix  J). 

The  output  includes  a  listing  of  the  physical  numerical  data 
entered  as  input  and  the  calculated  overall  thermal  conductance,  BTU/ 
(hr)(ft  )(°F),  for  the  walls,  roof  and  doors.  The  values  for  the 
horizontal  roof  are  'dummy'  values,  as  mentioned  previously,  but  these 
do  give  an  idea  as  to  the  data  for  a  horizontal  roof  as  specified  by 
the  user.  The  overall  thermal  conductance  values  given  are  0.107, 

0.103  and  0.151  for  the  walls,  roof  and  doors  respectively , indicating 
that  the  rate  of  heat  flow  through  the  doors  was  greater  than  that  through 
the  walls  which, in  turn, was  greater  than  that  through  the  roof. 

The  z-transfer  coefficients  are  calculated  on  the  basis  of 
surface  temperatures  given  for  each  surface  and  for  a  ramp-type  input 
and  a  sampling  time  interval  of  one  hour.  There  are  five  sets  of 
z-transfer  function  coefficients  given  for  each  component  with,  in  each 
case,  three  being  non-zero.  This  indicates  that  for  each  component 
the  heat  transfer  of  the  slab  is  affected  by  the  surface  temperature 
and  the  heat  flux  history  of  the  three  preceding  hours. 

7.1.2  Solar  Parameters. 

The  solar  parameters  are  the  same  for  Model  A  and  Model  B. 

These  are  presented  in  Appendix  J  for  each  component  and  component 
orientation  for  each  hour  of  the  simulation  period.  As  noted  previously, 
the  parameters  given  for  the  horizontal  roof  are  artificial  and  are  not 
included  in  the  psychrometri c  calculations  within  the  model  since  zero 
is  entered  as  the  area  for  the  horizontal  roof.  These  values  were  used, 
however,  to  compare  the  observed  solar  radiation  on  a  horizontal  surface 
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to  those  predicted  by  the  model. 

At  the  top  of  each  page  of  output  pertaining  to  each  component 
orientation,  the  latitude  and  longitude  of  the  location  were  recorded 
as  well  as  the  time  zone  number  and  daylight  saving  time.  The  time 
zone  number  indicates  the  time  behind  Greenwich  Civil  Time,  a  difference 
of  four  minutes  occuring  for  each  degree  difference  in  longitude  (99). 
Furthermore,  the  equation  of  time  and  declination  are  given  as 
calculated  within  the  program. 

The  clock  time,  solar  time,  solar  altitude,  solar  azimuth  and 
intensity  of  the  direct  normal  solar  radiation  incident  were  the  same 
for  all  components  throughout  the  simulation  period.  Inspection  of 
these  variables  (Appendix  J)  shows  that  the  solar  time,  indicating  the 
time  of  day  in  hours  with  respect  to  solar  noon,  was  zero  at 
approximately  1:30  p.m.  of  each  day.  This  appears  to  be  realistic 
considering  daylight  saving  time  and  that  Edmonton  is  west  of  105  degrees 
west  longtitude;  that  is,  with  no  daylight  saving  time  and  at  a  location 
of  105  degrees  west  longtitude,  solar  noon  would  have  occurred  at  12:00 
noon  (clock  time).  At  solar  noon  the  solar  altitude  was  maximum  and 
the  solar  azimuth  was  zero;  the  altitude  angle  being  the  angle  in  the 
vertical  plane  between  the  sun's  rays  and  the  projection  of  the  sun's 
rays  on  the  horizontal  plane  and  the  azimuth  angle  being  the  angle  in 
the  horizontal  plane  measured  from  south  to  the  horizontal  projection  of 
the  sun's  rays.  Since  solar  radiation  calculations  must  be  made  in  terms 
of  solar  time,  the  accuracy  of  these  values  was  necessary. 

The  direct  normal  solar  intensity  and  the  intensity  of  the  solar 
beam  on  a  horizontal  surface,  as  determined  experimentally,  were  compared 
to  those  calculated  by  the  program.  The  direct  normal  solar  intensity 
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was  recorded  in  the  data  output  for  the  solar  parameters  of  each 
component,  while  the  intensity  on  a  horizontal  surface  was  the  total 
solar  intensity  on  the  horizontal  roof  (solar  load  on  horizontal  roof). 

The  observed  and  predicted  values  for  solar  intensity  are 
summarized  in  Appendix  G.  The  observed  intensities  and  the  calculated 
intensities  were  not  identical  in  all  cases  but  the  general  trends  and 
peaks  were  similar.  These  differences  may  be  associated  with  the 
differences  in  the  cloud  cover  that  occurred  at  the  time  and  point  of 
measurement  and  the  data  obtained  from  the  Edmonton  Weather  Station  to 
represent  the  overall  sky  cloud  cover.  The  solar  intensity  readings 
would  have  been  much  more  accurate  had  the  readings  been  constantly 
recorded  on  a  chart  recorder,  but  a  tracking  device  to  follow  the  sun 
was  not  available.  For  this  reason,  the  experimentally  determined 
readings  were  dependent  upon  the  cloud  cover  over  the  sun  at  the  moment 
of  monitoring  and  do  not  represent  the  actual  hourly  average  values. 

The  intensity  of  the  direct  beam  on  the  component  surface  and  the 
total  solar  load  (including  the  direct  normal  intensity,  sky  diffuse 
intensity  and  ground  diffuse  intensity)  also  were  presented  for  each 
component  and  each  component  orientation.  The  values,  given  in  BTU/ 
(hr){fi  )  were  an  accurate  hourly  average  except  for  irreg'uilkriittfiss 
may  have  occurred  due  to  variation  in  cloud  cover  for  any  given  moment. 
The  total  solar  load  on  each  outer  component  surface  was  a  maximum  when 
the  sun  directly  faced  the  component;  for  example,  on  the  east  wall 
surface  the  solar  load  was  maximum  in  the  forenoon  while  on  the  west 
surface  the  solar  load  was  maximum  in  the  afternoon.  The  solar  load  on 
the  south  wall  surface  was  consistently  higher  than  that  on  the  north 
wall  surface.  These  trends  indicated  that  the  solar  calculations 
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accurately  followed  expected  trends  and  represented  the  general  solar 
heat  loads  on  the  building. 

The  solar  heat  gain  factors,  for  calculations  of  the  heat  transfer 
through  the  windows,  appeared  reasonable  with  maximums  on  the  east  wall 
in  the  forenoon  and  on  the  west  wall  in  the  afternoon.  Also,  the  sol- 
air  temperatures  showed  an  increase  when  the  solar  load  on  the  respective 
outer  surface  increased. 

Comparisons  of  solar  data  were  made  to  data  presented  by 
Stephanson  (93).  From  these  comparisons,  the  solar  calculations  were 
observed  to  follow  expected  trends  with  a  fairly  high  degree  of  accuracy. 
These  values  then  could  be  used  successfully  to  calculate  the  dynamic 
thermal  characteristics  within  the  total  confinement  unit. 

7.1.3  Thermal  Properties. 

The  thermal  properties  included,  for  analysis  purposes,  the  inside 
dry-bulb  temperature,  the  inside  relative  humidity,  the  outside  surface 
temperature  and  the  inside  surface  temperature.  These  are  discussed  for 
both  Model  A  and  Model  B  since  variations  did  occur.  The  data  for 
Model  A  (outside  temperature  representing  outside  conditions)  are 
presented  in  the  sample  output  (Appendix  J),  whereas  the  actual  output 
data  for  Model  B  were  not  included  due  to  the  large  amount  of  data  that 
would  be  required  for  inclusion.  The  temperature  data  considered  is 
presented  in  Appendix  G  giving  comparable  values  for  the  observed,  Model 
A  and  Model  B. 

The  data  were  analyzed  to  find  the  correlation  between  observed 
and  predicted  values  by  finding  the  coefficient  of  simple  correlation 
and  to  test  for  the  similarity  of  the  means  by  utilizing  the  paired  two-  > 
tailed  t-test  for  significance  (49,108).  The  differences  or  residuals 
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also  are  discussed  subsequently  for  some  of  the  variables  where 
differences  in  the  observed  and  the  predicted  values  occurred  (49). 
7 . 1 . 3 . 1  Inside  Room  Dry-Bulb  Temperature. 
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The  inside  room  dry-bulb  temperature  predicted  by  both  Model  A 
and  Model  B  are  illustrated  in  Figure  20  together  with  the  observed 
inside  dry-bulb  temperature  for  the  50-hour  monitoring  period. 

The  correlation  coefficient  between  the  observed  and  Model  A 
temperatures  and  between  the  observed  and  Model  B  was  0.97.  This  would 
indicate  that  the  model  accurately  predicted  the  cycling  nature  of 
inside  room  dry-bulb  temperatures. 

The  t-yalue  of  Model  A  and  observed  temperatures  was  -13.58  while 
the  t  for  Model  B  and  the  observed  was  -12.55.  The  hypothesis  that  the 
difference  between  the  means  of  each  population  is  zero  was  rejected  at 
the  99%  confidence  level  in  both  cases.  Therefore,  the  predicted  and 
the  observed  values  did  not  belong  to  the  same  population. 

Figure  20  indicates  that  the  model  predicted  the  inside  dry-bulb 
temperature  accurately  between  hour  35  and  hour  42  (11:00  a.m., 
September  11  to  6:00  p.m. ,  September  11).  During  this  period,  the 
ingoing  air  temperature  (outside  temperature)  was  fairly  high  (above 
60°F).  During  the  evenings  when  the  solar  load  was  zero  (no  sun)  and 
the  sol -air  temperature  was  equal  to  the  outside  temperature,  both 
models  predicted  the  same  inside  dry-bulb  temperature  while,  during  the 
day  when  the  sol-air  temperature  was  higher  than  the  outside 
temperature.  Model  B  predicted  the  dry-bulb  temperature  slightly  more 
accurately,  but  not  significantly  so. 

During  the  night  and  a  cold  rainy  day  (Septenter  12,  1973)  the 
residuals  (differences  between  the  predicted  and  the  observed  values) 
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Figure  20:  Inside  room  dry-bulb  temoeratures. 
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were  large.  The  model  predicted  temperatures  that  were  approximately 
15°F  lower  than  the  observed  during  the  last  few  hours  of  simulation. 
These  large  residuals  may  have  been  partially  due  to  the  very  wet 
conditions  accompanied  by  low  temperatures.  In  this  case,  the 
theoretical  basis  for  the  model  apparently  was  inaccurate.  The  heat 
transfer  of  wet  surfaces  should  account  for  the  evaporation  rate  of 
water  and  the  water  heat  storage  of  the  water  layer  (4,73).  Average 
experimental  temperatures  also  may  have  contributed  to  error  in 
validation  as  temperature  gradients  were  large  from  floor  to  ceiling 
and  from  wall  to  wall  as  indicated  by  psychrometer  readinas.  The 
recorded  data  were  the  average  readings  of  the  thermocouples  located 
within  the  facility. 

The  model  predicted  the  cyclic  behavior  of  the  inside  dry-bulb 
temperature  with  a  highly  significant  degree  of  accuracy  (P<0.01). 

The  mean  difference  for  temperature  prediction  of  Model  A  versus 
observed  was  -8.3°F  (range  -16.2  to  -0.8°F)  while  for  Model  8  versus 
observed  was  -7.9°F  (r.ange  -15.9  to  +0.3°F). 

Similar  results  were  obtained  by  Wilson  (103)  using  a  finite 
difference  simulator  to  model  the  heat  transfer  through  walls, 
ceiling  and  floor  on  a  small  test  shelter  with  no  inside  heat  sources. 
The  average  deviation  between  the  observed  and  predi  ctedi  'wa-s  *  to 
This  researcher  also  found  the  computer  simulator  to  be  a  satisfactory 
predictor  of  inside  temperatures  with  best  accuracy  for  the  period  of 
highest  temperatures,  as  also  noted  with  this  model. 

7 . 1 . 3 . 2  Inside  Room  Relative  Humidity. 

Examination  of  Figure  21,  which  presents  the  inside  room 
relative  humidity  for  the  observed.  Model  A  and  Model  B,  indicates  the 


♦ 


. 


’ 


'  "  .  i!  rei  'wJ:  rbsnq 


OBSERVED 
MODEL  A 
MODEL  B 


65 


o 

o 


«o  o  «n 

OO  hs  >o 


(%)  AiiaiWDH  3AliV13y 


1 


CM 


o 


o 


Fiaure  21:  Inside  room  relative  humidities. 
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accuracy  with  which  the  model  predicts  relative  humidity. 

The  correlation  coefficient  for  both  Model  A  and  Model  B  versus 
the  observed  was  0.76,  indicating  that  the  predicted  and  the  observed 
relative  humidities  were  well  in  step  (P  0.01).  However,  the 
correlation  is  not  as  high  as  that  for  temperature  prediction.  The 
value  for  t  for  Model  A  versus  the  observed  was  -4.26  and  that  for  Model 
B  versus  the  observed  was  -4.67.  This  would  indicate  that  the  null 
hypothesis  that  the  mean  of  the  predicted  and  the  mean  of  the  observed 
relative  humidity  was  the  same  could  be  rejected  at  the  99%  confidence 
level,  however,  with  less  confidence  than  found  for  inside  dry-bulb 
temperature. 

The  relative  humidity  prediction  was  accurate  only  for  the  first 
13  hours  of  validation  (Figure  21).  From  hour  33  (9:00  a.m. ,  September 
11)  the  relative  humidity  prediction  began  to  deviate  from  the  observed. 
This  deviation  appeared  to  be  larger  during  the  day  when  the  solar  load 
was  not  equal  to  zero.  The  mean  difference  between  Model  A  and  the 
observed  was  -3.3%  (range  -16.6%  to  4.4%)  relative  humidity  while  the 
mean  difference  between  Model  B  and  the  observed  was  -3.9%  (range 
-16.7%  to  4.4%)  relative  humidity. 

This  analysis  showed  that  the  inside  relative  humidity  prediction 
was  slightly  more  accurate  than  the  inside  dry-bulb  temperature 
prediction,  but  the  cyclic  behavior  was  not  predicted  as  well. 

Phillips  and  Esmay  (85),  using  a  mathematical  model  to  simulate 
inside  environmental  conditions  in  a  laying  house,  found  in  their 
verification  trials  a  mean  deviation  of  5.1%  between  actual  and 
predicted  relative  humidity.  They  also  found  that  maximum  deviations 
occurred  when  outside  or  inside  conditions  were  changing  rapidly. 

7 . 1 . 3 . 3  Inside  Surface  Temperature. 


The  data,  as  plotted  in  Figures  22  to  26  for  the  observed, 
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Figure  22:  South  wall  inside  surface  temperatures. 
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Figure  24:  East  wall  inside  surface  temperatures. 
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Figure  25:  West  wall  inside  surface  temperatures. 
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Figure  26:  Ceiling  inside  surface  temperatures. 
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Model  A  and  Model  B  inside  surface  temperatures  also  are  presented 
in  Appendix  G.  The  values  for  t,  the  correlation  coefficient,  the 
mean  differences  and  the  range  of  the  differences  for  these  temperatures 
are  presented  in  Table  1. 

Table  1  indicates  that  the  observed  and  the  model  inside  surface 
temperatures  kept  step  in  step  very  well,  indicating  that  the  model 
predicted  the  dynamic  nature  with  a  high  degree  of  significance  ( P< 0 . 0 1 ) . 
The  value  for  t,  however,  indicates  that  the  hypothesis  that  the 
difference  between  the  means  of  the  predicted  and  observed  populations 
was  equal  to  zero  could  be  rejected  at  the  99%  level  of  confidence. 

Figures  22  to  26  indicate  that  the  inside  surface  temperatures, 
as  predicted  by  both  models  was  low  generally  when  the  inside  dry-bulb 
temperature  was  predicted  lower  than  that  observed.  During  zero  solar 
load  (no  solar  radiation),  both  Model  A  and  B  predicted  the  same  inside 
surface  temperature.  Generally,  the  residuals  between  the  predicted 
and  the  observed  inside  surface  temperatures  were  greatest  during  zero 
solar  radiation  and  during  periods  of  precipitation.  Furthermore,  the 
inside  surface  temperature  prediction  by  Model  B  appeared  to  be  more 
accurate  than  that  by  Model  A  (as  indicated  by  the  value  for  t)  except 
for  periods  of  high  solar  heat  load  on  the  outer  surfaces  (no 
precipitation  and  minimal  cloud  cover). 

7 . 1 . 3 . 4  Outside  Surface  Temperature. 

The  observed  and  predicted  values  for  the  outside  surface 
temperatures ,  as  presented  in  Appendix  G,  are  presented  in  Figures 
27  to  32.  The  statistical  data  for  observed  versus  Model  A  and  B  are 
presented  in  Table  2. 

Table  2  indicates  that  Model  A  predicted  the  outside  surface 
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TABLE  1.  STATISTICAL  ANALYSIS  OF  INSIDE  SURFACE  TEMPERATURES. 


Model  A  Versus  Observed 


Statisti c 

South 

Wall 

North 

Wall 

East 

Wall 

West 

Wall 

Cei 1 i ng 

correlation  coefficient 

0.97 

0.95 

0.98 

0.96 

0.96 

t-value 

-8.98 

-5.69 

-11.59 

-10.30 

-10.79 

mean  difference 
(predi cted-observed) 

-5. 1 °F 

-3. 6°F 

-6. 1°F 

-5. 3°F 

-7. 6°F 

range  of  differences 
(predi cted-observed ) 

•12.7  to 

1 . 6°F 

-11.2  to 
4. 7°F 

-12.9  to 
0.  9°F 

-11.8  to 
2. 1°F 

-15.5  to 
2. 1  °F 

Model  B  Versus  Observed 

Statisti c 

South 

Wall 

North 

Wall 

East 

Wall 

West 

Wall 

Cei 1 i ng 

correlation  coefficient 

0.97 

0.95 

0.98 

0.96 

0.95 

t-value 

-6.89 

-4.75 

-9.53 

-8.36 

-9.29 

mean  difference 
(predi cted-observed) 

-4.4°F 

-3. 1°F 

t5. 5°F 

-4. 7°F 

-7. 0°F 

range  of  differences 
(predi cted-observed) 

■12.1  to 
4.3°F 

-11.2  to 
6.  T°F 

-12.4  to  - 
2. 0°F 

11.3  to 

3. 9°F 

-1 5. 2  to 

4. 1  °F 
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Figure  27:  South  wall  outside  surface  temperatures. 
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Figure  28:  North  wall  outside  surface  temperatures. 
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Figure  29:  East  wall  outside  surface  temperatures. 
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Figure  30:  West  wall  outside  surface  temoeratures. 
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Figure  31:  West  slope  outside  roof  surface  temperatures. 
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Figure  32:  East  slope  outside  roof  surface  temperatures. 
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TABLE  2.  STATISTICAL  ANALYSIS  OF  OUTSIDE  SURFACE  TEMPERATURES. 


Model  A  Versus  Observed 


Statistic 

South 

Wall 

North 

Wall 

East 

Wall 

West 

Wall 

East 

Slope 

Roof 

West 

Slope 

Roof 

correlation 
coeffi cient 

0.98 

0.99 

0.97 

0.97 

0.98 

0.98 

t-value 

-3.66 

2.60 

-0.87 

-0.76 

0.94 

2.02 

mean  difference 
(predi cted-observed) 

-1 . 8°F 

0. 8°F 

-0. 4°F 

-0. 4°F 

0. 5°F 

1.1  °F 

range  of  differences 
(predi cted-observed) 

-12.7  to 
3. 1°F 

-3. 3  to 
4. 5°F 

'  -9. 1  to 
5.  5°F 

i  -12.9  to 
13. 2°F 

-10.2  to 
9. 4°F 

-9.6  to 
9. 6°F 

Model  B  Versus  Observed 

Statisti  c 

South 

Wall 

North 

Wall 

East 

Wall 

West 

Wall 

East 

Slope 

Roof 

West 

Slope 

Roof 

correlation 

coefficient 

0.95 

0.99 

0.95 

0.93 

0.95 

0.95 

t-value 

4.08 

5.26 

3.87 

3.78 

5.26 

5.70 

mean  difference 
(predi cted-observed) 

4.  3°F 

2. 2°F 

3.7°F 

3. 4°F 

4. 8°F 

5. 2°F 

range  of  differences 
(predi cted-observed) 

-4.9  to 
20. 6°F 

-3.0  to 
8. 9°F 

-4.8  to 
24. 4°F 

-4. 7  to 

22. 2°F 

-3.2  to 
21 . 0°F 

-3. 4  to 

21 . 8°F 
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temperature  with  a  higher  statistically  significant  degree  of  accuracy. 

The  correlation  for  both  models  is  very  highly  significant.  The 
value  for  t  indicates  that  Model  A  predicted  the  outside  surface 
temperature  for  all  outside  surfaces,  except  the  south  wall,  with  a 
highly  significant  degree  of  accuracy.  The  hypothesis  that  the 
difference  between  the  mean  of  the  observed  population  and  the  mean  of 
the  predicted  population  was  zero  could  not  be  rejected  at  the  99% 
confidence  level.  Excluding  the  north  and  south  wall,  the  hypothesis 
could  not  be  rejected  even  with  95%  confidence. 

Inspection  of  the  values  for  outside  surface  temperatures 
indicates  that  during  the  period  of  low  heat  load  on  the  outer  surface 
of  the  building  (zero  solar  load)  the  model  predicted  the  outside 
surface  temperatures  with  a  highly  significant  degree  of  accuracy. 
Furthermore,  using  outside  temperature  to  represent  the  outside  conditions 
gave  a  high  degree  of  accuracy  for  predicting  outer  surface  temperature, 
especially  during  minimal  heat  load  periods.  However,  during  periods 
where  the  solar  heat  load  on  the  outer  surfaces  was  high,  the  prediction 
using  outside  temperature  to  represent  outside  conditions  was  low, 
while  the  prediction  using  sol-air  temperature  to  represent  outside 
conditions  was  high.  This  may  indicate  that  the  algorithms  to  calculate 
heat  transfer  in  the  model  should  be  altered  to  accurately  use  sol-air 
temperature. 

7 . 1 . 3 . 5  Summary. 

The  foregoing  discussion  noted  that  predictions  of  inside 
conditions  and  surface  conditions  were  of  the  same  order,  that  is,  when 
one  prediction  was  too  low  the  other  was  as  well.  This  was  due  to  the 
very  dynamic  and  interactive  dependence  of  surface  temperature  on 
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inside  and  outside  conditions  and  vice  versa. 

No  association  could  be  developed  between  predicted  values  for 
inside  relative  humidity  and  predicted  values  for  inside  dry-bulb 

temperature  nor  could  these  values  be  associated  with  changing  conditions 

as  noted  by  Phillips  and  Esmay  (85).  In  their  verification  trials 
using  a  model  to  predict  the  environment  in  poultry-producti on  units, 
they  found  that  maximum  deviations  occurred  when  outside  or  inside 
conditions  were  changing  rapidly.  In  these  situations,  their  model 
tended  to  respond  instantaneously  while  actual  conditions  were  buffered 
by  physiological  or  structural  effects.  They  also  found  that  higher 
than  actual  temperature  predictions  were  associated  with  low  humidity 
predictions  and  vice  versa.  They  concluded  that  this  tended  to  indicate 
that  the  surface  temperature  of  deep  litter,  which  has  a  major  influence 
on  evaporation,  was  in  fact  responding  more  rapidly  than  predicted. 

Using  the  sol -air  temperature  to  represent  the  outside  conditions 
resulted  in  a  more  accurate  prediction  of  inside  surface  temperature 
and  inside  ambient  conditions,  whereas  using  the  outside  temperature  to 
represent  the  outside  conditions  resulted  in  a  more  accurate  prediction 
of  outside  surface  temperatures.  These  results  indicate  the  need  to 
check  and  possibly  alter  the  algorithms  associated  with  the  determination 
of  surface  temperature  and  heat  flux  so  that  sol-air  temperature 
might  be  accurately  used.  These  changes  should  give  the  same  or  similar 
results  as  when  using  the  outside  temperature  with  the  present  model 
which  includes  radiation  and  convection  at  the  outer  surface  in 
calculation  of  heat  flux  and  surface  temperature. 

The  results  of  this  verification  may  have  been  in  error  due  to  the 
wet  conditions  and  the  related  error  in  the  theoretical  model  as 
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mentioned  previously.  Furthermore,  the  mechanical  failure  of  the 
chopper  on  the  temperature  recorder  may  have  introduced  error  in  the 
observed  readings  prior  to  the  time  when  error  was  detected  and  the 
verification  trial  halted. 

Error  in  inside  temperature  prediction  also  may  have  resulted 
from  data  errors  in  heat  and  moisture  production  of  swine.  A  relative 
humidity  of  50%  was  used  to  derive  the  regression  equations  used  to 
predict  heat  and  moisture  production  of  the  animals  (16).  High  relative 
humidity  tends  to  decrease  evaporation,  thereby  altering  the  sensible 
and  latent  heat  production  as  predicted  by  the  regression  equations  in 
the  model. 

There  are  numerous  other  areas  where  the  model  may  be  in  error 
due  to  inaccurate  data.  For  example,  thermal  conductivity  varies  with 
many  factors  of  which  the  specific  gravity  and  moisture  content  and 
its  distribution  are  the  most  important  (99).  The  magnitude  of  error 
associated  with  these  sources  are  much  too  dynamic  and  interactive  to 
determine. 

The  general  agreement  of  some  of  the  results  of  this  verification 
with  others  can  be  noted.  Good  (42)  developed  a  model  to  simulate 
environmental  control  and  found  inside  temperature  and  relative  humidity 
prediction  to  generally  agree  with  the  observed,  but  rejected  the 
hypothesis  that  actual  and  predicted  data  were  from  the  same  population. 
Wilson  (103)  found  that  the  simulator  using  finite  differences  to  model 
transient  heat  transfer  was  a  good  predictor  during  daylight  hours  but 
not  during  the  night. 

7.1.4  Heat  Transfer. 


The  program  output  (Appendix  J)  gives  the  hourly  heat  flows 
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through  the  structural  components.  These  are  given  for  the  walls, 
doors,  floor,  horizontal  roof,  pitched  roof  and  windows.  The  summation 
of  these  then  are  entered  under  total  heat  transfer. 

All  values  under  the  horizontal  roof  are  zero  since  the  area  for 
the  horizontal  roof  is  zero  (no  horizontal  roof).  This  indicates  that 
the  solar  calculations  and  surface  temperatures  for  the  horizontal  roof 
were  not  included  in  calculations  of  heat  load  due  to  heat  transfer 
through  the  horizontal  roof.  These  values  are  given  in  British  Thermal 
Units  per  hour  with  positive  values  indicating  heat  transfer  into  the 
total  confinement  and  negative  values  indicating  heat  transfer  out  of 
the  unit.  A  positive  heat  load  on  the  building  occurs  during  periods 
of  relatively  high  solar  heat  load  on  the  building,  otherwise  a  heat 
loss  through  the  structural  components  occurs. 

The  heat  transfer  through  the  doors,  as  predicted  by  the 
model, are  fairly  large  negative  values.  These  may  be  incorrect  due  to 
an  error  in  the  manner  in  which  values  are  assigned  to  the  common 
block  (common  area  in  the  computer  which  is  accessible  to  all  program 
segments)  within  the  model.  Time  and  financial  restrictions  prevented 
the  author  from  modifying  the  computer  program  so  as  to  remove  this 
imperfection.  Such  imperfections  and  limitations  can  only  be  removed 
after  considerably  more  experience  with  the  model. 

7.1.5  Ventilation  Criteria. 

The  computer  model  printed  the  hourly  ventilation  criteria  as 
calculated  for  the  model  hog  barn  as  presented  in  Appendix  J.  The 
variables  included  are  as  mentioned  previously. 

The  ventilation  within  the  facility  was  constant  at  3000  cfm; 
i.e.,  the  ventilation  rate  determined  for  the  building.  The  ventilation 
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rate  required  to  remove  the  resultant  heat  load  was  calculated  within 
+  3  percent  of  the  ventilation  rate  within  the  building  as  specified. 

The  relative  humidity  at  this  ventilation  rate  also  was  printed.  The 
ventilation  rate  required  to  remove  moisture  to  maintain  an  optimal 
relative  humidity  of  70%  also  was  calculated  as  well  as  the  supplemental 
heat  requirement.  The  supplemental  heat  requirement  was  negative  when 
the  ventilation  rate  required  to  remove  moisture  load  was  lower  than 
that  to  remove  the  heat  load,  indicating  the  need  for  cooling.  This  may 
be  achieved  by  sprinkling,  spraying,  refrigerating,  etc.  (18,29,48,54,78). 
The  negative  values  indicate  the  cooling  requirement  in  British  Thermal 
Units  of  heat  per  hour. 

7.2  Sensitivity  Analysis. 

Since  sensitivity  testing  is  an  essential  part  of  the  validation 
process,  certain  input  parameters  were  tested  to  determine  their  impact 
on  the  model  prediction.  The  inside  temperature  was  chosen  to  be  the 
most  important  criterion  for  sensitivity  analysis  and  was  used  as  a 
measure  of  effectiveness. 

7.2.1  Incoming  Temperature. 

The  initial  validation  assumed  the  incoming  temperature  as  that 
of  the  outside  air.  Since  the  air  used  for  ventilation  purposes  was 
drawn  through  the  attic  space,  this  was  not  an  accurate  assumption. 
A.S.H.R.A.E.  (4)  give  a  general  relationship  for  estimation  of  attic  . 
temperature  which  neglects  the  effects  of  any  interchange  of  air  such 
as  would  take  place  through  attic  vents  or  louvers  intended  to 
preclude  attic  condensation  under  natural  ventilation.  The  same  reference 
source  indicates  that  test  data  have  determined  that  the  reduction  in 
temperature  difference  between  attic  air  and  weather  is  linear  with 
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mechanical  ventilation  rates  between  0.0  and  0.5  cubic  feet  per  square 
foot  of  ceiling  area.  The  relationships  for  determining  attic  tempera¬ 
ture  do  not  consider  such  factors  as  heat  exchange  within  the  attic, 
solar  radiation,  naturally  ventilated  conditions  and  conditions  where 
air  is  drawn  through  this  naturally  ventilated  attic  space  as  existed 
within  the  test  facility.  For  these  reasons,  an  approximation  method 
for  determining  attic  temperature  was  not  used  and  the  attic 
temperatures  were  monitored.  These  temperatures  were  then  assumed  as 
the  ingoing  or  ventilating  air  temperatures. 

The  resulting  inside  dry-bulb  temperature,  as  presented  in 
Appendix  G,  is  plotted  in  Figure  33  along  with  the  observed  and  that 
determined  using  the  outside  temperatures  as  the  incoming  temperature 
(Model  B  used  for  comparison). 

As  noted  previously,  the  correlation  coefficient  for  Model  B  and 
the  observed  was  0.97  with  a  value  for  t  of  -12.55  and  a  mean  difference 
of  -7. 9°F  (range  -15.9  to  0.>3oF).  Using  the  attic  temperature  to 
represent  the  incoming  temperature,  the  resulting  correlation  with  the 
observed  was  0.98.  The  value  for  t  was  -4.88  and  the  mean  difference 
was  -3.1°F  (range  -8.6  to  7.4°F).  The  result  was  a  slightly  better 
correlation  and  a  much  more  highly  significant  value  for  t.  The 
difference  between  the  means  also  was  reduced  substantially. 

Figure  33  indicates  the  improvement  in  inside  dry-bulb  temperature 
prediction  that  occurred  during  periods  of  under-estimation  by  the  model 
when  the  ingoing  temperature  was  assumed  as  that  of  the  outside  air. 
However,  during  the  period  when  the  inside  temperature  prediction  was 
accurate  using  outside  temperature  to  represent  incoming  temperature, 
the  prediction  using  the  attic  temperature  to  represent  incoming 
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Figure  33:  The  effect  on  inside  room  dry-bulb  temperatures  of  changing  the  ingoing  air 
temperatures  from  that  of  the  outside  air  to  that  of  the  attic  space. 
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temperature  was  much  too  high. 

These  results  indicate  that  attic  temperatures  must  be  considered 
for  estimating  the  incoming  temperature,  but  under  naturally  ventilated 
conditions  these  are  difficult  to  determine.  In  addition,  the  ingoing 
(incoming)  air  may  be  some  combination  of  the  outside  air  and  attic 
air  depending  on  such  weather  factors  as  wind  speed,  wind  direction 
and  barometric  pressure  as  well  as  the  location  and  area  of  air  vents 
and/or  louvers  into  the  attic  and  from  the  attic  to  the  room. 

7.2.2  Heat  and  Moisture  Production. 

The  heat  and  moisture  production  of  the  confined  animals  are  the 
major  constituents  of  the  resultant  heat  and  moisture  load  on  the 
building.  As  the  test  facility  was  a  swine  confinement  unit,  the  heat 
and  moisture  production  for  swine  was  determined  by  regression  equations 
(16)  as  recommended  for  design  purposes  (2,4,36). 

Bluffington  et  al  (13)  noted  that  estimates  of  heat  and  moisture 
lost  by  livestock  and  poultry  inside  a  building  are  probably  the  least 
reliable  of  all  the  factors  contributing  to  the  temperature  and  humidity 
conditions  inside  a  building. 

Reece  and  Deaton  (87)  studied  the  latent  and  sensible  heat 
production  of  a  poultry  barn  on  a  whole-house  basis  and  found  important 
diurnal  variations.  Their  results  indicated  that  there  are  a  number  of 
factors  that  are  beyond  control  that  must  be  considered  to  predict  the 
exact  heat  and  moisture  production  rates  of  confined  animals  or  birds. 

The  continuous  changes  in  heat  loss  for  purposes  of  design  cannot 
be  accurately  defined.  Consideration  should  be  made  to  simulate  the 
greater  heat  loss  after  feeding  as  noted  by  Bond  et  al  (15)  as  well  as 
the  affect  of  animal  movement  on  heat  loss  by  convection  as  noted  by 
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the  same  authors.  Interesting  results  with  beef  cattle  in  total 
confinement  buildings  also  were  noted  by  Remmele  et  al  (88).  They  found 
that  latent  heat  production  from  such  a  unit  decreased  as  relative 
humidity  and  animal  density  increased,  but  increased  with  increasing 
temperature.  Sensible  heat  production  also  was  found  to  decrease  as 
temperature  increased»  but  to  increase  as  relative  humidity  increased. 

Hahn  (47)  indicated  that  studies  in  Germany  had  confirmed  the 
accuracy  of  the  data  of  Bond  et  al  (16).  This  led  to  further  attempts 
by  the  author  to  establish  the  validity  of  these  data  from  several 
foreign  sources  under  varying  climatic  and  management  systems  with 
regard  to  heat  and  moisture  data  in  confinement  buildings  (7,10,46,92, 
105).  Baxter  (10)  provided  some  original  data  from  work  conducted  at 
the  Farm  Buildings  Institute  in  Holland  that  appeared  to  agree  with 
the  data  used,  but  these  were  not  sufficiently  extensive  to  make  an 

absolute  statement  on  the  level  of  agreement.  Further  communications 
with  this  Institute  (46)  did  not  prove  fruitful. 

The  Max-Planck  Instttut  (105)  provided  some  information  regarding 
heat  and  moisture  production  in  all  livestock  buildings.  This  work  (106) 
was  undertaken  to  find  if  the  latest  German  legal  code  was  valid.  The 
German  Industry  Code  which  constitutes  the  legal  codes  in  Germany  has 
been  continuously  updated.  Only  a  1963  translation  (31)  of  the  code 
could  be  obtained. 

Wolfermann  and  Hornig  (106)  noted  that  exact  data  for  heat  and 
moisture  production  of  animals  over  time  were  of  utmost  importance 
for  the  calculation  of  heat  balance  and  ventilation  within  modern 
confinement  units  and  stated  that  data  relating  to  new  housing  systems 
for  livestock  are  non-existent.  They  also  noted  that  work  in  the  U.S.S.R. 
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shows  considerably  different  results  than  those  by  Bond  et  al  (16). 

Their  own  studies  with  regard  to  heat  and  moisture  production  resulted 
in  the  following: 

1.  There  were  no  significant  differences  between  day  and  night 
heat  and  moisture  production  in  a  piggery  with  feeder  pigs  and 
no  bedding  on  partly  slatted  floors  (liquid  manure  systems),  but 
moisture  dissipation  data  were  significantly  higher  than  data 
used  up  to  the  present. 

2.  A  lower  water-vapor  output  occurred  at  night  than  during  tne  day, 
with  the  heat  output  being  higher  during  the  day  than  at  night, 
in  a  piggery  for  breeding  purposes  without  bedding,  slatted  floor 
or  liquid  manure  system:. 

They  concluded  that  moisture  and  heat  dissipation  with  regard  to  new 
housing  systems  are  considerably  higher  than  expected. 

Considering  all  the  foregoing,  the  sensible  heat  production  and 
the  moisture  production  were  increased  and  decreased  by  20%  to  give 
all  the  possible  combinations  of  these  effects.  The  resulting  inside 
dry-bulb  temperature  is  presented  in  Figures  34  to  36.  (as  well  as 
Appendix  G).  The  statistical  analysis  of  these  are  presented  in  Table  3. 

This  analysis  indicated  that  decreased  moisture  Droduction  and 
increased  sensible  heat  production  significantly  improved  the  accuracy 

of  prediction  of  inside  dry-bulb  temperature.  This  indicated  that 
accurate  heat  and  moisture  production  data  for  the  animals  confined  was 
very  important.  These  data  may  vary  substantially  due  to  variation  in 
the  species  confined,  ration  fed,  thermal  stress,  housing  systems  used, 
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Figure  3^:  The  effect  on  inside  room  dry-bulb  temperatures  of  varying  the  management  factor  for 
sensible  heat  production  and  maintaininn  the  management  factor  for  moisture  production 
at  0.80. 
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Figure  35:  The  effect  on  inside  room  dry-bulb  temperatures  of  varying  tne  management  factor  for 
sensible  heat  production  and  maintaining  the  management  factor  for  moisture  production 
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Figure  36:  The  effect  on  inside  room  dry-bulb  temperatures  of  varying  the  management"- factor  for 

sensible  heat  production  and  maintaining  the  management  factor  for  moisture  production 
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TABLE  3.  STATISTICAL  ANALYSIS  OF  INSIDE  DRY-BULB  TEMPERATURE  RESULTING  FROM  SENSITIVITY  ANALYSIS 
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7.2.3  Other  Parameters. 


The  sensitivity  of  the  model  to  several  additional  paramete 

was  carried  out,  including; 

1.  increasing  emissivity  factor  of  the  outside  wall  surface 
from  0.92  to  0.95, 

2.  decreasing  emissivity  factor  of  the  outside  wall  surface 
from  0.92  to  0.85, 

3.  increasing  absorptivity  factor  of  the  outside  wall  surface 
from  0.40  to  0.50, 

4.  decreasing  absorptivity  factor  of  the  outside  wall  surface 
from  0.40  to  0.25, 

5.  increasing  emissivity  factor  of  the  outside  roof  surface 
from  0.93  to  0.95, 

6.  decreasing  emissivity  factor  of  the  outside  roof  surface 
from  0.93  to  0.85, 

7.  increasing  absorptivity  factor  of  the  outside  roof  surface 
from  0.82  to  0.91 , 

8.  decreasing  absorptivity  factor  of  the  outside  roof  surface 
from  0.82  to  0.78, 

9.  increasing  the  overall  heat  transfer  coefficient  for  the 
windows  from  0.66  to  0.80, 

10.  decreasing  the  overall  heat  transfer  coefficient  for  the 
windows  from  0.66  to  0.50, 

11.  averaging  all  the  hogs  into  one  average  weight  of  75  pounds, 

12.  decreasing  the  inward-flowing  fraction  of  radiation  for  the 
inner  and  outer  pane  from  0.67  and  0.17  to  0.50  and  0.12 
respectively, 
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13.  increasing  the  inward-flowing  fraction  of  radiation  for  the 
inner  and  outer  pane  from  0.67  and  0.17  to  0.85  and  0.23 
respectively, 

14.  increasing  clearness  number  from  1.0  to  1.1, 

15.  decreasing  clearness  number  from  1.0  to  0.8, 

16.  decreasing  the  thickness  of  the  insulation  from  2.0  to  1.5 
inches  for  the  walls  and  ceiling, 

17.  increasing  the  thickness  of  the  insulation  from  2.0  to  2.5 
inches  for  the  walls  and  ceiling, 

18.  increasing  the  inside  air  film  conductance  coefficient 
from  1.46  to  3.0, 

19.  decreasing  the  inside  air  film  conductance  coefficient 
from  1.46  to  1.3, 

20.  decreasing  outside  air  film  conductance  coefficient  from 
4.0  to  2.0,  and 

21.  increasing  outside  air  film  conductance  coefficient  from 
4.0  to  6.0. 

These  values  were  chosen  on  the  basis  of  previously  mentioned 
deviations  found  in  the  literature. 

These  individual  variations  resulted  in  a  maximum  of  +  1.5°F 
change  in  the  inside  dry-bulb  temperature  with  an  average  change  of 
+  0.5°F.  Due  to  the  very  large  amount  of  data  acquired,  these  are  not 
presented.  In  addition  to  analyzing  the  sensitivity  of  each  of  these 
variables  on  the  inside  dry-bulb  temperature,  a  statistical  analysis 
was  carried  out  for  each  of  the  surface  temperatures  as  well  as  the 
inside  relative  humidity.  The  results  were  in  the  same  order  as  those 
indicated  by  the  inside  dry-bulb  temperature.  This  agreement  shows  that 
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the  values  chosen  for  these  properties  do  not  have  a  great  effect  on 
the  accuracy  by  which  the  model  predicts  the  thermal  environment. 
However,  the  additive  effects  of  several  of  these  changes  may  be  very 
significant.  Furthermore,  the  effect  of  these  changes  under 
completely  different  conditions  also  may  be  significant. 


' 

. 


8.  SUMMARY  AND  CONCLUSIONS 


The  model  of  the  thermal  environment  within  total  confinement 
livestock  housing  developed  in  this  project  achieves  the  accuracy, 
flexibility  and  adaptability  necessary  for  systems  analysis  of  environ¬ 
mental  control  alternatives  in  total  confinement.  This  model  is  an 
effective  tool  for  studies  concerned  with  the  dynamic  behavior  of  the 
thermal  environment  in  such  units.  The  algorithms  included  in  the 
model  give  the  accuracy  and  sophistication  required  to  simulate  the 
dynamic  thermal  environment  that  exists  in  commercial  livestock  housing. 
The  model  also  provides  the  desired  flexibility  for  incorporation  of 
future  developments  as  they  may  arise.  The  detailed  documentation 
should  assist  interested  persons  to  use  the  model  with  no  serious 
difficulties. 

The  validation  of  the  model  indicates  that  the  model  cycles  and 
effectively  predicts  the  dynamic  nature  of  the  thermal  environment 
within  total  confinement.  However,  the  predictions  are  very  sensitive 
to  the  accuracy  of  input  parameters.  As  Hinkle  (55)  stated  "...  the 
output  from  the  computer  is  no  better  than  the  data  and  information 
going  in." 

The  predictions  of  the  dynamic  behavior  of  the  real  system  by 

models  depends  largely  upon  the  accuracy  of  the  assumptions  concerning 

the  basic  characteristics  of  the  real  system.  This  model,  having 

the  advantages  of  the  digital  computer  with  its  enormous  memory 

capacity,  accuracy  and  speed,  make  it  possible  to  handle  the  very 

complex  dynamic  behavior  of  the  environmental  system.  However,  to 

realize  the  full  potential  of  a  dynamic  simulation  such  as  this,  the 
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assumptions  listed  earlier  must  be  replaced  with  more  valid  time 
dependent  data. 

Environmental  control  involves  requirements  arising  from  the 
physiology,  nutrition,  reproduction  and  behavior  of  animals  and  the 
provisions  of  physical  facilities  and  systems  of  management  so  that 
production  may  be  organized  efficiently.  As  many  different  factors  are 
interacting  in  the  situation,  no  simple  universal  solutions  are  to 
be  expected. 


9.  SUGGESTIONS  AND  PRACTICAL  IMPLICATIONS 


Experience  with  and  modifications  to  the  model  are  required  to 
define  and  evaluate  any  imperfections  and  limitations  that  may  exist 
within  the  model.  Of  utmost  importance,  this  model  must  be  validated 
with  more  data  in  several  locations,  including  very  warm  (summer)  and 
very  cold  (winter)  conditions.  These  verification  trials  should  apply 
a  data  aquisition  system  for  collection  and  reduction  of  experimental 
data.  Not  only  the  similarities  between  the  model  and  the  real  system 
should  be  examined,  but  also  the  differences  between  the  specific 
properties  of  the  model  and  real  system.  Investigation  such  as  this 
may  reveal  unexpected  properties  of  the  model  to  correct  imperfections 
in  theory. 

To  achieve  maximum  accuracy,  there  are  a  number  of  areas  which 
require  further  research  or  action  to  replace  assumptions  with  actual 
data  and  relationships.  Experience  with  the  model  has  indicated  that 
such  data  include:  heat  and  moisture  production  of  animals  as  they  are 
affected  by  varying  conditions;  condition  of  the  incoming  air  used  to 
ventilate  the  building;  effects  of  varying  wind  conditions;  heat 
sources  and  sinks  such  as  furnishings,  occupants  and  equipment  in  the 
room;  effects  of  age,  moisture,  etc.  on  the 'range  for  thermal" 
coefficients;  and  effect  of  infiltration. 

The  replacement  of  these  parameters  with  actual  data  as  well  as 

replacement  of  all  assumptions  cited  earlier  within  the  main  body  of 

this  study  with  actual  data,  will  result  in  a  much  more  realistic 

simulation  model.  Of  greatest  importance  is  the  heat  and  moisture 

production  and  condition  of  the  incoming  air  drawn  through  the  attic 

space  as  indicated  by  the  sensitivity  analysis.  This  is  especially 
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important  as  most  swine  in  Alberta  are  reared  in  confinement  and 
approximately  40%  of  these  units  are  ventilated  through  the  attic  in 
summer  and  90%  are  ventilated  in  this  manner  in  the  winter  (27). 

Consideration  should  be  given  to  such  variations  as  may  occur  in 
conductances  through  the  attic  air  space  with  time  as  noted  by 
Wilson  (103).  Results,  such  as  those  noted  by  Kimura  and 
Stephanson  (62)  which  show  that  the  solar  intensity  on  a  partly  cloudy 
day  can  be  higher  than  on  a  completely  cloudless  day  suggesting  that 
the  values  may  be  higher  than  the  values  indicated  by  the  A.S.H.R.A.E. 
formulas  used  in  this  model,  should  be  investigated  to  assess  their 
i  mpact. 

There  are  certain  models  and  algorithms  which  may  be  adapted  and 
used  to  possibly  improve  upon  this  model.  These  may  include: 

1.  A  model  proposed  by  Beckett  and  Vidrine  (11)  to  predict  the 
heat  produced,  moisture  produced,  pig  surface  temperature  and 
rate  of  weight  gain.  A  model  such  as  this,  however,  requires 
vast  amounts  of  accurate  data  which  would  not  necessarily  improve 
the  model,  but  may  prove  useful  in  predicting  the  rate  of  gain  of 
hogs. 

2.  A  model  by  Teter  et  al  (98)  for  simulating  the  metabolic  energy 
intake,  heat  loss  and  growth  efficiency  of  broilers  over  a  range 
of  weights,  temperature  and  metabolizable  energy  in  the  feed. 

3.  Algorithms  by  Carson  (23)  for  use  in  optimizing  economic  returns 
and  predicting  performance  of  the  animal  within  the  confinement 
unit  so  as  to  provide  swine  producers  with  a  quantitative  set  of 
precise  design  alternatives  and  the  economic  implications  of 


these  alternatives. 
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4.  Equations  recently  derived  by  Morrison  et  al  (79)  to  relate  the 
combined  effects  of  temperature  and  humidity  on  the  rate  of  gain 
of  hogs. 

5.  A  model  proposed  by  Bluffington  et  al  (13)  that  simulates  heat 
production  of  active  growing  Wrolstad  white  turkeys,  based  on 
experimental  values  of  heat  production  obtained  by  indirect 
calorimetry  and  on  growth  data. 

6.  A  model  proposed  by  Paine  and  Butchbaker  (83)  for  beef  animals 
to  predict  the  heat  and  moisture  production  under  varying 
conditions . 

7.  A  mathematical  model  by  Butchbaker  et  al  (21)  to  simulate  beef 
animal  performance  (average  daily  gain  and  feed  efficiency) 

in  confinement  buildings. 

8.  A  model  by  Strombaugh  and  Roller  (97)  for  modelling  thermo¬ 
regulatory  control  of  piglets. 

Many  of  these  alternatives  would  be  adapted  for  the  systems  design  of 
confinement  units  other  than  swine  units. 

Furthermore,  the  model  may  be  improved  to  include  materials 
handling  facilities,  manure  disposal  and  alternate  feeding  methods. 

Prices  then  may  be  attached  to  components,  thus  incorporating  costs 
for  evaluation  of  economic  performance. 

One  of  the  major  assets  of  a  model  such  as  this  is  its 
usefulness  as  a  tool  in  the  investigation  of  adjustable  parameters  which 
may  affect  the  system.  A  series  of  simulations  may  be  conducted  to 
evaluate  changes  in  design  and  management  factors  that  might  produce 
optimum  design  such  as  carried  out  by  Phillips  and  Esmay  (85). 

Variables  that  may  be  considered  include  location,  orientation ,  materials, 
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fan  size,  heater  size  and  stocking  density.  Sensi ti vi ty  of  such  factors 
as  the  effect  of  size,  shape,  color  and  orientation  of  buildings  on 
interior  thermal  environmental  conditions  may  be  carried  out  to  verify 
the  experimental  results  of  such  findings  on  a  small  box  basis  with 
no  inside  heat  sources  (81,82). 

Hopefully,  the  most  valuable  application  of  the  model  will  be 
to  serve  as  a  stepping  stone  for  future  models  that  are  more  accurate 
and  complete,  and  perhaps  if  used  with  other  detailed  models,  it 
might  serve  as  a  component  part  of  an  overall  model  that  would  allow  a 
detailed  analysis  of  the  total  pork  production  system  and  perhaps 
even  the  total  agricultural  system. 

Computer  simulation  programs  such  as  this  can  be  used  to  test 
one  of  the  many  parts  of  a  total  system  easier,  cheaper  and  infinitely 
quicker  than  could  be  done  in  an  actual  field  experiment. 
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APPENDIX  A: 


PROGRAM  FLOW  DIAGRAM 


The  program  flow  diagram  adheres  to  conventional  flow  charting 
procedures.  The  following  is  a  general  description  of  the  notation 
used.  . 


Connector 


Read  data 


I 

I 

I 

I 


Do-loop*  connector 


data 


Control  and 
calculations 


Offpage  connector 
current  page  =  n 
transfer  to  page  = 


Offpage  connector 
current  page  =  n 
from  page  =  m 


*  The  Do-loop  is  a  control  which  facilitates  the  programming  of  repetitive 
computations. 


:a  xmmu 
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Figure  Al.  Flow  diagram  for  main  program. 

MAIN  1 


MAIN:  An  algorithm  to  determine  the  dynamic  thermal  environment  within  total  confinement 


livestock  housing. 

Note  1.1: 


The  row  names  for  program  output  parameters  are  specified 


where  ROW 

1 

■ 

clock  time, 

ROW 

2 

« 

solar  time, 

ROW 

3 

rr 

solar  altitude, 

ROW 

4 

a 

solar  azimuth, 

ROW 

5 

= 

direct  solar  intensity, 

ROW 

6 

a 

intensity  of  direct  solar  radiation  on  surface 

ROW 

7 

a 

intensity  of  total  solar  radiation  on  surface, 

ROW 

8 

« 

solar  heat  gain  factor, 

ROW 

9 

- 

outside  sol-air  temperature, 

ROW 

10 

« 

outside  dry-bulb  temperature, 

ROW 

11 

= 

outside  wet-bulb  temperature, 

ROW 

12 

= 

longwave  radiation  at  the  outside  surface, 

ROW 

13 

- 

shortwave  radiation  at  the  outside  surface, 

ROW 

14 

a 

convection  at  the  outside  surface, 

ROW 

15 

■ 

heat  flux  at  the  outside  surface, 

ROW 

16 

■ 

outside  surface  temperature, 

ROW 

17 

= 

inside  surface  temperature, 

ROW 

18 

= 

heat  flux  at  the  inside  surface. 

ROW 

19 

« 

convection  at  the  inside  surface,  and 

ROW 

20 

a 

inside  dry-bulb  temperature. 

N 
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Figure  Al.  Continued 


MAIN  2 


Data  2.1: 


-  simulation  period, 

-  thickness  of  the  attic  air  cavity, 

-  emissivity  factor  for  outside  wall  surface, 

¥ 

-  absorptivity  factor  for  outside  wall  surface, 

-  absorptivity  factor  for  outside  roof  surface, 

-  emissivity  factor  for  outside  roof  surface, 

-  heat  transfer  coefficient  for  windows  installed, 

-  shading  coefficient,  and 

-  relative  humidity  for  the  ventilation  rate  required 
remove  moisture. 


Variable  2.1:  total  simulation  period  in  hours. 


Equation  2.1: 


time 

(hrs) 


24 


•1) 


+  24 


READ 
Data  2.2 


Data  2.2:  hourly  heat  load  for  the  total  simulation 
period. 


Data  2.3: 


the  average  hog  weight  for  a  maximum  of  ten 
groups  of  hogs. 


READ 

Data  2.3 


.OJ’fll  MfCS  '.H  i  >*  S’!  8t»'-C 


' 


116 


Figure  Al.  Continued 


MAIN  3 


/  REAI 

1  Data 

7 

/  READ 

1  Data  3.2  / 

/  READ  / 

1  Data  3.3  / 

/  READ 

1  Data  3.4  / 

/  READ  / 

1  Data  3.5  / 

/  RE 

1  Dats 

AD  / 

‘7 

Data  3.1:  the  number  of  hogs  in  each  of  the  groups  of  hogs  given  in 
Data  2.3. 

Data  3.2:  *  -  management  factor  for  moisture  production,  and 

-  management  factor  for  sensible  heat  production. 

Data  3.3:  hourly  barometric  pressure  for  the  total  simulation  period. 

Data  3.4:  -  total  number  of  animals  confined; 

-  areas  of  all  walls,  doors,  roofs  and  windows;  and 

-  perimeter  of  the  floor. 

Data  3.5:  hourly  ventilation  rates  for  the  total  simulation  period. 

Data  3.6:  accuracy  desired  for  ventilation  rate  calculation. 


Figure  Al.  Continued 
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MAIN  4 


Data  4.1:  -  air  film  conductance  for  all  outside  surfaces, 

-  air  film  conductance  for  inside  roof  surface  when  a 

horizontal  roof, 

-  air  film  conductance  for  inside  wall  and  door  surfaces, 

-  air  film  conductance  for  inside  roof  surface  with  a 

pitched  roof, 

-  emissivity  factor  for  the  'top'  attic  inside  surface,  and 

-  emissivity  factor  for  the  'bottom'  attic  inside  surface. 

Data  4.2:  ingoing  temperature  indicator,  attic  or  outside. 

Variables  4.1:  -  attic  dry-bulb  temperatures,  and 
-  attic  wet-bulb  temperatures. 


Statement  4.1:  ingoing  temperature  is  equal  to  outside  temperature. 


*for  all  simulation  hours. 


* 
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Figure  Al.  Continued 


MAIN  5 


Data  5.1:  -  hourly  attic  dry-bulb  temperatures  for  the  total  simulation 

period  and 

-  hourly  attic  wet-bulb  temperatures  for  the  total  simulation 
.  period. 

Subroutine  SOLAR:  An  algorithm  to  find  the  solar  position,  the  intensity 
of  solar  radiation  incident  on  the  outer  surfaces  of 
the  buildings,  the  sol-air  temperature  for  a  surface, 
and  the  solar  heat  gain  factors  for  heat  gain  through 
windows. 

parameters  in:  time 

parameters  out:  -  hourly  solar  output  parameters  for 
all  surfaces,  as  specified  in  ROWS 
1  to  11  of  Note  1.1, 

-  equation  of  time, 

-  declination, 

-  latitude  of  location, 

-  longitude  of  location, 

-  daylight  saving  time, 

-  location, 

-  time  zone  number,  and 


date. 


. 

gg. 

^  .  It  —  _  i. 
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Figure  Al.  Continued 


MAIN  6 


Variables  6.1:  z-tranafer  function  coefficients  for  walls,  roofs,  and 
doors. 


Note  6.1:  Assign  values  to  the  outside  dry-bulb  temperature  and  the 
outside  wet-bulb  temperature  from  the  solar  output  matrix. 


Statement  6.1:  ingoing  temperature  is  equal  to  attic  temperature. 


Statement  6.2:  outside  dry-bulb  temperature  <  60.0 


*  for  all  simulation  hours. 
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gure  Al.  Continued 
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*6.4  and  6.5 

Statement  7.1:  outside  dry-bulb  temperature  _>  60.0°. 
* 

Variable  7.1:  inside  dry-bulb  temperature. 


Equation  7.1:  finside  3 

(dry-bulb  j 

Itemperature  J 


outside  ^ 
dry-bulb  j  +  5.0° 
^temperature  J 


Statement  7.2:  attic  dry-bulb  temperature <  60°. 
Statement  7.3:  attic  dry-bulb  temperature  >  60°. 


Figure  Al.  Continued 
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Variable  8.1:  inside  dry -bulb  temperature. 


Equation  8.1:  [inside 

< dry-bulb 
[temperaturej 


["attic  "l 

< dry -bulb  >  +  5.0° 

l^temperaturej 


*7.2  and  7.4 


Note  8.1:  Insert  inside  dry -bulb  temperature  into  ROW  20  of  program 
output  matrix. 


Subroutine  NAMEAl:  An  algorithm  to  evaluate  the  z-transfer  coefficient 

for  calculation  of  transient  heat  flow  through  walls 
and  roofs. 

parameters  out:  the  z-transfer  function  coefficients 
for  the  walls,  roofs  and  doors  and 
the  total  number  of  coefficients  for 
each  component. 


**for  all  simulation  hours 


Subroutine 
NAME A  1 
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Figure  Al.  Continued 


MAIN  9 


*  for  all  simulation  hours 

Note  9.1:  Initialize  the  trial  and  error  procedure  counter  to 
'  indicate  that  the  procedure  has  not  begun. 

**  21.3  and  21. A 

Note  9.2:  Set  the  component***  as  that  for  a  wall  and  the  component 
orientation****  to  nil. 

***  component  indication 

I COMP  =  1  for  wall, 

I COMP  =  2  for  pitched  roof, 

ICOMP  =  3  for  horizontal  roof,  and 
1C0MP  =  A  for  door. 

****  component  orientation 

ICOMP  =  1  for  south  wall, 

ICOMP  =  2  for  west  wall, 

ICOMP  =  3  for  east  wall, 

ICOMP  =  A  for  north  wall, 

ICOMP  =  5  for  roof  slope  #1, 

ICOMP  =  6  for  roof  slope  #2, 

ICOMP  =  7  for  horizontal  roof, 

ICOMP  =  8  for  south  doors, 

ICOMP  =  9  for  west  doors, 

ICOMP  =10  for  east  doors,  and 
ICOMP  =11  for  north  doors. 


1.  ‘  1*4 
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Figure  Al.  Continued 


MAIN  10 


Note  10.1:  Set  the  z- transfer  function  coefficients  as  those  for  a 
wall. 

¥ 

*  for  all  z- transfer  function  coefficients  for  the  wall. 

**  13.2,  13.3,  13.6,  and  14.2. 

Statement  10.1:  hour  of  simulation  >7. 

***  for  all  simulation  hours. 

Note  10.2:  Establish  the  outside  and  inside  surface  temperature 
histories. 


T  =  T 

is,-t  i,t 

where  ^  is  the  inside  surface  temperature  at  time, 

-t,  and  T  is  the  inside  dry-bulb  temperature  at  time,  t 

1»  f 


T  „  =  T  „ 
os,-t  o,  t 


where  T  is  the  outside  surface  temperature  at  time, 

os,-t 

-t,  and  T  is  the  outside  sol-air  temperature  at  time,  t 
o.  t 


« 


. 
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Figure  Al.  Continued 


MAIN  11 


Subroutine  START:  An  algorithm  for  determining  convection,  radiation 

and  heat  flux  for  each  surface  of  a  building  component 
and  then  solving  for  outside  and  Inside  surface 
temperatures  for  the  first  seven  hours  of  simulation. 

parameters  in:  -  component  indication, 

-  component  orientation, 

-  z-transfer  function  coefficients, 

-  outside  surface  temperatures, 

-  inside  surface  temperatures, 

-  outside  dry-bulb  temperature, 

-  inside  dry-bulb  temperature, 

-  emi8sivity  factor  for  outside  wall 
surface, 

-  absorptivity  factor  for  outside  wall 
surf ace, 

-  absorptivity  factor  for  outside  roof 
surface, 

-  emissivity  factor  for  outside  roof 
surface, 

-  outside  air  film  conductance,  and 

-  inside  air  film  conductances. 

parameters  out:  -  output  matrix  parameters  ROW  12  to 


ROW  20  of  Note  1.1 
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Figure  Al.  Continued 
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Subroutine  FLUX:  An  algorithm  for  determining  convection,  radiation 

and  heat  flux  for  each  surface  or  a  building  component 
and  then  solving  for  the  outside  and  inside  surface 
temperatures  for  all  simulation  hours  except  the  first 
seven. 


parameters  in: 


-  time, 

-  component  indications, 

-  component  orientation, 

-  z-transfer  function  coefficients, 

-  outside  dry-bulb  temperatures, 

-  inside  dry-bulb  temperatures, 

-  emissivity  factor  for  outside  wall 
surface, 

-  absorptivity  factor  for  outside  wall 
surface, 

-  absorptivity  factor  for  outside  roof 
surface, 

-  absorptivity  factor  for  outside  roof 
surface, 

-  outside  air  film  conductance,  and 

-  Inside  air  film  conductances. 


parameters  out:  -  output  matrix  parameters  of  ROW  12 


to  ROW  20  of  Note  1.1. 


■ 
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Figure  Al 


I  COM 


=  11  =  7 


Continued 


MAIN  13 


“  3> 

5,8,9,  and  10 


*  11.2  and  12.2 

Note  13.1:  Set  the  z- transfer  function 
coefficients  as  those  for 
a  pitched  roof. 

**  for  all  z-transfer  function 

coefficients  for  the  pitched  roof. 

Note  13.2:  Set  the  z-transfer  function 
coefficients  as  those  for  a 
horizontal  roof. 

***  for  all  z-transfer  function 

coefficients  for  the  horizontal  roof. 


i:  .  *•»  Lit  iart 
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Figure  Al :  Continued 


MAIN  14 


Note  14.1:  Set  the  z- transfer  function  coefficients  as  those  for  a  door. 

*  for  all  z-transfer  function  coefficients  for  the  door. 

Subroutine  WALL:  An  algorithm  for  determining  the  hourly  heat  flow 
through  the  structural  components. 

parameters  in:  -  time, 

-  heat  transfer  coefficient  for  the 
windows, 

-  outside  dry-bulb  temperature, 

-  inside  dry -bulb  temperature, 

-  shading  coefficient,  and 

-  all  areas  of  structural  components. 

parameters  out:  -  heat  flow  through  the  walls, 

-  heat  flow  through  the  pitched  roofs, 

-  heat  flow  through  the  horizontal  roofs, 

-  heat  flow  through  the  windows, 

-  heat  flow  through  the  doors, 

-  heat  flow  through  the  floor,  and 

-  total  heat  flow  through  all  the 


components. 


' 


' 
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Figure  Al.  Continued 
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Subroutine  HPROD:  An  algorithm  for  determining  the  sensible  heat 

production  and  moisture  production  of  the  confined 
animals. 

¥ 

parameters  in:  -  hog  weights  for  each  group  of  hogs, 

-  number  of  animals  in  each  group  of  hogs, 

-  management  factor  for  moisture 
production, 

-  management  factor  for  sensible  heat 
production, 

-  time,  and 

-  inside  dry -bulb  temperature. 


parameters  out:  -  total  sensible  heat  production  of  the 
confined  animals,  and 
-  total  moisture  production  of  the 
confined  animals. 

Variables  15.1:  sensible  heat  production  and  moisture  production  within 
the  building. 


Equations  15.1: 


(sensible  heat 
production  within) 
.the  building  J 


[sensible  heat" 
[production  of 
| the  confined 
animals 


[sensible  heat 
+  1  product  ion  of 
[the  furnace  or 
yieater 


[moisture  production) 
within  the  building 


[moisture  production 
I  of  the  confined  animals 


. 

. 
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Figure  Al.  Continued 
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Figure  Al.  Continued 
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Subroutine  VENTIL:  An  algorithm  for  determining  the  pey chrome trie 

properties  of  air  and  for  determining  the  ventilation 
rates  required  to  remove  heat  and  moisture. 

¥ 

parameters  in:  -  time, 

-  ingoing  dry-bulb  temperature, 

-  ingoing  wet-bulb  temperature, 

-  barometric  pressure, 

-  total  heat  flow  through  the  structural 
components, 

-  total  sensible  heat  production  within 
the  building, 

-  total  moisture  production  within  the 
building,  and 

-  relative  humidity  at  ventilation  rate 
required  to  remove  moisture. 

parameters  out:  -  ventilation  rate  required  to  remove 
the  heat  load, 

-  ventilation  rate  required  to  remove 
the  moisture, 

-  relative  humidity  for  ventilation  rate 
required  to  remove  heat  load, 

-  heat  load  required  to  ensure  a 
ventilation  rate  to  remove  moisture, 

-  resultant  heat  load  on  building,  and 


-  outside  relative  humidity 


I. 
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Figure  Al. 


Continued 
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Variable  18.1:  error  in  ventilation  rate  calculation. 


Equation  18.1: 


Statement  18.1: 


Statement  18.2: 


Statement  18.3: 


Statement  18.4: 


^error  in 
ventilation  [ 

^rate  calculationj 


absolute 

value 


f  ventilation 

pentilatiorij 

1  rate  required 

}  jrate  in 

to  remove  heat 

jexi sting 

1  load 

[building 

Ventilation 

rate 

in 

existing 

building 


terror  in  |  foutside  1 

ventilation  [>0.75,  |  relative  >>50.0, 
rate  calculationj  [humidity J 

{inside  dry -J 
bulb  [^75.0 

temperature  J 


ferror  in 
ventilation 
irate  calculationj 


foutside  1 

[>0.50,  |  relative  [>50.0, 
^humidity  J 


[inside  dry-1 
bulb  [<[75.0 

temperature  J 


(error  in  ~j  f outside  1 

ventilation  [>0.25,  <  relative  [>50.0, 
rate  calculationj  [.humidity J 


{inside  dry-J 
bulb  [<[75.0 

temperature  J 


{error  in  "1  foutside  1 

ventilation  [>0.25,  <  relative  [>50.0 
rate  calculationj  ^humidity J 

{inside  dry-1 
bulb  [<C75.0 

temperature  J 


<1.61  J1  .-»■  it  V  ^  l. 


■ 


■ 
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Figure  Al.  Continued 


MAIN  19 


Variable  19.1:  increment  of  change  for  inside  dry -bulb  temperature. 
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Figure  Al.  Continued 


MAIN  20 


Variable  20.1: 


increment  of  change  for  inside 


dry- bulb  temperature. 


*  19.2,  19.4,  and  19.6 


Variable  20.2:  permitted  error  in  ventilation  rate  calculation. 


Equation  20.1: 


r  ^ 

permitted 

ventilation 

r ■ 

accuracy 

error  in 

< 

rate  in 

L 

required  in 

^ventilation 

= 

existing 

X  < 

ventilation  r 

rate 

building 

rate 

calculation 

«.  -< 

calculation 

Variable  20.3:  error  in  ventilation  rate  calculation. 


Equation  20.2: 

»  « 
error  in 

ventilation 

ventilation 

i 

ventilation 

rate 

calculation^ 

rate  required 
to  remove 
heat  load 

rate  in 

existing 

building 

Statement  20.1:  inside  dry-bulb  temperature  has  been  increased 

and  decreased;  i.e.,  the  desired  accuracy  cannot 
be  achieved. 


. 
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Figure  Al.  Continued 


MAIN  21 


CALCULATE 
Var.  21.1 
Eq.  21.1 


Statement  21.1:  absolute 
value 


error  in 

ventilation 

rate 

calculation 


< 


[permitted  error 
<in  ventilation 


—  (rate  calculationj 


Statement  21.2: 


error  in 

ventilation 

rate 

calculation 


>  o-o 


Variable  21.1:  [inside  dry-]  [inside  dry-] 

ibulb  >  =  <bulb  > 

[temperaturej  (temperature] 


increment  of 
change  for  ^ 

inside  dry- 
bulb  temperature 


Note  21.1:  Begin  trial  and  error  procedure  with  decreasing  inside  dry- 
bulb  temperature. 


Note 

21.1 

Equation  21.2: 

Inside 

dry-bulb 

[-I 

inside  dry-] 
bulb 

temperature, 

.temperaturej 

increment  of 
change  for 
inside  dry- 
bulb  temperature 


Note  21.2:  Begin  trial  and  error  procedure  with  increasing  inside  dry- 
bulb  temperature. 


CALCULATE 
Var.  21.1 
Eq.  21.2 

Note 

21.2 

1 2M  1 

L  9.i  J 

. 
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Figure  Al.  Continued 


MAIN  22 


prfT* " 
l 

r 22. 2  n 

r-rr-n-H 


*  20.5  and  21.2 

Data  22.1:  program  output  parameters  as  listed  in  Note  1.1. 

**  for  all*  components  and  all  simulation  hours. 

Data  22.2:  -  number  of  animals  confined,  and 

-  areas  of  all  structural  components. 

***  for  all  simulation  hours. 

Data  22.3:  hourly  heat  flow  through  all  the  structural  components. 


r*7 


Data  22. 4: 


22.2 


hourly  ventilation  criteria  calculated  for  the  model  barn: 

-  input  ventilation  rate, 

-  ventilation  rate  required  to  remove  moisture, 

-  relative  humidity  for  the  ventilation  rate  required  to  remove 
moisture, 

-  ventilation  rate  required  to  remove  the  heat  load, 

-  relative  humidity  for  the  ventilation  rate  required  to 
remove  the  heat  load, 

-  heat  requirement  to  ensure  a  ventilation  rate 
required  to  remove  moisture, 

-  resultant  heat  load  on  the  building, 

-  total  sensible  heat  produced  by  the  animals  and  furnace, 

-  outside  dry -bulb  temperature, 

-  outside  wet-bulb  temperature, 

-  inside  dry-bulb  temperature, 

-  moisture  production,  and 

-  outside  relative  humidity. 


' 


•-  •>  *  * 
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Figure  A2.  Flow  diagram  for  SOLAR. 

SOLAR  1 


SOLAR:  An  algorthm  to  find  the  solar  position,  the  intensity  of  solar  radiation  incident 
on  the  outer  surfaces  of  buildings,  the  sol-air  temperature  for  a  surface,  and 
the  solar  heat  gain  factors  for  heat  gain  through  windows. 


Data  1.1:  polynomial  coefficients  for  use  in  calculation  of  transmittance 
and  absorptance  of  glass. 

Data  1.2:  -  latitude, 

-  longitude, 

-  time  zone  number, 

-  daylight  saving  time,  and 

-  location. 

Data  1.3:  -  surface  tilt, 

-  surface  azimuth, 

-  surface  counter,  and 

-  surface  indicator. 

*  for  each  outside  surface  of  the  building. 


_ _ >  as  •  IlsoMi*  rt*  ^4A.10? 


• 

•V 
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Figure  A2.  Continued 


SOLAR  2 


INITIALIZE 
Vara.  2.1 


CALCULATE 
Vars.  2.1 

EflSi  ,ZiL- 


Variables  2.1:  -  transmission  factor  of  diffuse  radiation  for  windows,  and 

-  absorption  factors  of  diffuse  radiation  through  outer 
and  inner  window  pane. 


Equations  2.1: 


transmission 
factor  of 
diffuse 
radiation 
for  windows 


>  = 


Jtransmission I 
[coefficient  I 

j  +  2 


■  r  ' 

absorption 
factor  of 
diffuse  radiation 
through  outer 
window  pane 

h. 

>  « 

absorption 
coefficient 
for  outer 
pane 

► 

j 

j  +  2 

m  ** 

absorption 
factor  of 

\  diffuse  radiation 
through  inner 
window  pane 

'f  = 

hit 

f  absorption 
coefficient 
[inner  pane 

fori 

j  +  2 

*  summation  of  six  coefficients 


. 
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Figure  A2.  Continued 


SOLAR  3 


Data  3.1:  -  day  of  year, 

-  day  of  month, 

-  month,  and 

-  year. 

Data  3.2:  -  clearness  number, 

-  cloud  type, 

-  ground  reflectivity, 

-  parameter  a/hQ  *, 

-  parameter  hQ 

-  inward  flowing  fraction  of  the  radiation  absorbed  by  the 
inner  pane,  and 

-  inward  flowing  fraction  of  the  radiation  absorbed  by  the 
outer  pane. 

*  a  =  absorptance  of  the  surface  for  solar  radiation,  and 

h  =  coefficient  of  heat  transfer  by  radiation  and  convection  at  the 
o 

outer  surface. 

Data  3.3:  -  total  cloud  cover  for  each  hour, 

-  outside  dry-bulb  temperature  for  each  hour,  and 

-  outside  wet-bulb  temperature  for  each  hour. 


■ 
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Figure  A2.  Continued 


SOLAR  4 


2 

Equation  4.1:  w  * 

Variables  4.1:  -  equation  of  time, 

-  declination, 

-  apparent  solar  constant, 

-  atmospheric  extinction  coefficient,  and 

-  sky  diffuse  factor. 


Equation  4.2:  Fourier  Series  = 


A  +  A.  cos  (w  x  day  of  year) 
o  1 

+A^  cos  (2  x  w  x  day  of  year) 

+A^  cos  (3  x  w  x  day  of  year) 

+B^  sin  (w  x  day  of  year) 

+B^  sin  (2  x  w  x  day  of  year) 

+B^  sin  (3  x  w  x  day  of  year) 


■ 

A 

o 

A1 

A2 

A3 

B1 

B2 

B3 

equation  of  time 

0.302 

-22.93 

-0.229 

-0.243 

3.8^1 

0.002 

-0.055 

declination 

0.0 

0.007 

-0.05 

-0.0015 

-0.122 

-0.156 

-0.005 

apparent  solar 

0.58 

1 

o 

• 

oo 

0.28 

constant 

368.44 

24.52 

-1.14 

-1.09 

atmospheric 

extinction 

0.1717 

-0.0344 

0.0032 

0.0024 

-0.0043 

0.0 

-0.0008 

sky  diffuse 
factor 

0.0905 

-0.0410 

0.0073 

0.0015 

-0.0034 

0.0004 

-0.0006 

. 
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Figure  A2.  Continued 


SOLAR  5 


1.*  r- j-y 


I  ;  W?| 
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Figure  A2.  Continued 


SOLAR  6 


V 


. 
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Figure  A2.  Continued 


SOLAR  7 


Equation  7.1: 


Variables  7.1: 


Equations  7.2: 


Variable  7.2: 


Equation  7.3: 


Statement  7.1: 


{solar  I  hour  angle  (degrees) 
time  |  15.0 


direction  cosines  of  the  direct  solar  beam;  Cos  (z), 

Cos  (w)  and  Cos  (s). 

cos  (z)  =  sin  (latitude)  sin  (declination)  +  cos  (latitude) 
cos  (declination)  cos  (hour  angle). 

cos  (w)  =  cos  (declination)  sin  (hour  angle). 


cos  (s)  =  <1.0  -  cos^  (z)  -  cos^  (w)> 


solar  altitude. 


-1 


[aUitude]  =  8in~l  (C°S  (z)) 


cloud 

type 


cirrus  or  cirrostratus 


and 

(solar  I  /  <  co 
altitude]^  45 


' 


' 
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Figure  A2.  Continued 


SOLAR  8 


Statement  8.1: 


res 


no 


IF 

Statement 
8.5 

no 


I  cloud! 

[type  j 

and 


=  cirrus  or  cirrostratus 


(solar  1 
altitude/ 


>  45c 


Statement  8.2: 


j cloud  | 
[type  j 


=  stratus 


and 

solar  ,rO 

laltitudei  — 


Statement  8.3: 


(cloud  I 
[type  J 

and 


=  stratus 


1 


>  «° 


no 

Statement  8.4: 

I cloud  | 

[type  j 

4=  stratus,  cirrus  or  cirrostratus 


and 


yes 

Statement 

solar  1 

\  8.4  ( 

altitudef 

Statement  8.5: 


<  45° 

j^ype^l  ^  stratus,  cirrus  or  cirrostratus 
and 

fuSude}>  «° 
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Figure  A2. 


CALCULATE 
Var.  9.1 
-.Eai.M 


CALCULATE 
Var.  9.1 
Eq.  9.2 


CALCULATE 
Var.  9.1 


Continued 


SOLAR  9 


*  7.2  and  8o7 


Variable  9.1:  cloud  cover  modifier. 


Equation  9.1:  [ cloud  1  [total] 

(cover  )  =  0.598  +  0.00026  (cloud; 
[modifier  J 


cover  I 


("total! 
+  0.0021  (cloud) 
[coverj 


("total! 
-  0.00035  (cloud) 
LcoverJ 


Equation  9.2: 

[  cloud  J 

1 

[total] 

1 

cover 
[modif  ierj 

=  0.908  -  0.03214 

,  cloud  ) 
[coverj 

[total] 

+  0.0102  (cloud) 

[coverj 

[total!  2 

-  0.00114  (cloud) 
[coverj 


Equation  9.3: 

[  cloud 

[totall 

1 

cover  | 

[modif  ierj 

}  =  0.849  -  0.01277 

,cloud) 

LcoverJ 

+  0.0036 


[total!  2 
( cloud) 
Lcover) 


-  0.00059 


[total] 

(cloud) 

[coverj 


. 


' 


• 
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Figure  A2. 


CALCULATE 
Var.  10.1 
Eq.  10.1 


CALCULATE 
Var.  10.1 
Eq.  10.2 


CALCULATE 
Var.  10.1 
Eq.  10.3 


Continued 


SOLAR  10 


Variable  10.1:  cloud  cover  modifier. 


Equation  10.1: 


{cloud 
cover 
modifier 


{  totall 
cloud) 
cover) 


{total~| 
cloud) 
cover) 


*  0.00068 


ftotall 
<  cloud) 
[coverj 


Equation  10.2:  1 

[cloud  1 

['total'] 

cover  \  =  0.724  -  0.00652  < 

cloud ) 

1 

[modif  ierj 

^coverj 

{total] 
cloud) 
coverj 

(totafl  ^ 

-  0.00047  <cloud) 
[coverj 


Equation  10.3: 


fcloud  "I 

|  | 

[total'i 

(  cover 

=  0.959  -  0.02304 

cloud  > 

[modif  ierj 

1 

[cover  J 

+  0.00787 


jtotalT 
<cloud  ) 
[cover  J 


-  0.00091 


(total' 

<cloud 

[cover 


' 
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Figure  A2.  Continued 


SOLAR  11 


*  9.2,  9.4,  9.6,  10.2,  10.4  and  10.6 

Statement  11.1:  cos  (hour  angle)  tan 
¥ 

Variable  11.1:  solar  azimuth. 


declination! 

latitude 


Equation  11.1: 


Equation  11.2: 


I  solar  I 
I  azimuth/ 


solar  I 
azimuth/ 


180.0  -  sin'1  - — — T 

I  cos  (.solar  altitude; 


gin-l  I  cos  (w) _  I 

(cos  (solar  altitude) 


■ 
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Figure  A2. 


CALCULATE 
Var.  12.1 
Eq.  12.1 


CALCULATE 
Var.  12.2 
Eq.  12.2 


CALCULATE 
Var.  12.33 
Eq.  12.3 


Continued 


SOLAR  12 


*  11.2  and  11.3 


Variable  12.1:  intensity  of  direct  normal  solar  radiation. 


Equation  12.1: 


intensity  of 
direct  normal 
solar 
radiation 


fapparent 1  [clearness] 

<  solar  >  x  <  ,  >  x 

(consent/  l™”1’"  J 


I  cloud 

cover  j  x  e 
modifier J 


,] 


atmospheric 
extinction  coefficient 


v.  cas 


(z) 


Variable  12.2:  sky  brightness. 


Equation  12.2: 


f sky  1  fsky  1  (intensity  of 

brightness)  =  {diffuse)  x  {direct  normal 

Lfactor  J  Lsolar  radiatior 


T 


cl  earness  numbe 


f 


Variable  12.3:  ground  brightness. 


Equation  12.3:  I  ground 

j  brightness 


ground 

reflectivity 


[sky  1  + 

jbrightnessi 


'intensity 

of  direct  l  (  /  d 

.  ,  )  cos  IzJJ 

normal  solarl  v 

^radiation 


■■ 
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Figure  A2.  Continued 


SOLAR  13 


Variables  13.1; 


Equation  13.1: 


Variable  13.2: 


Equation  13.2: 


Statement  13.1; 


Variable  13.3: 


direction  cosines  of  normal  to  surface. 

where  «  -  reference  axis  =  vertical 

S  -  reference  axis  =  horizontal  to  west 
Y  -  reference  axis  =  horizontal  to  south 

*  =  cos  (surface  tilt  angle) 
g  =  sin  (surface  azimuth  angle)  x 
sin  (surface  tilt  angle) 

Y  =  cos  (surface  azimuth  angle)  x 
sin  (surface  tilt  angle) 


cosine  of  the  angle  of  incidence. 


{cosine  of  the") 
angle  of 
incidence 


cos  (z)  +  6  cos  (w)  +  Y  cos  (s) 


(cosine  of  the) 
angle  of  \ 

incidence 


>  -0.20 


ratio  of  sky  diffuse  radiation  on  the  vertical  surface 
to  the  sky  diffuse  radiation  on  the  horizontal  surface, 


Y. 


. 
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Figure  A2.  Continued 


SOLAR  14 


Variable  14.1:  ratio  of  sky  diffuse  radiation  on  the  vertical  surface 
to  sky  diffuse  radiation  on  the  horizontal  surface,  Y. 


{cosine  of  the3  ("cosine  of  the! 

angle  of  \  +  0.313  (angle  of  \ 

incidence  J  [incidence 


Statement  14.1:  f cosine  of  the'i 

/  angle  of  l >  0.0 

[incidence 


Variable  14.2:  intensity  of  the  direct  solar  radiation  incident  on 
surf ace. 


Variables  14.3:  transmission  factors  of  direct  solar  radiation  for 

windows  and  absorption  factors  of  direct  solar  radiation 
through  outer  and  inner  window  pane. 


Equation  14.2: 


'  ■. 

r  - 

intensity  of  the 

intensity  of 

cosine 

direct  solar 

direct 

of  the 

\  radiation 

>  =  < 

normal  solar 

>  - 

angle  of 

incident  on 
surface 

radiation 

incidence 

* 

k 

- 


/ 


. 
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Figure  A2.  Continued 


SOLAR  15 


Variable  15.1:  transmission  factor  of  direct  solar  radiation  for 
windows. 


Equation  15.1: 


tran smission 
factor  of 
direct  solar 
radiation 
for  windows 


Z 

J-l 


I  transmission ( 
coefficient  I 


{cosine  of 
angle  of  j 
incidencej 


J-l 


Variables  15.2:  absorption  factors  of  direct  solar  radiation  through 
outer  and  inner  pane. 


Equation  15.2: 


absorption 
factor  of 
direct  solar 
radiation 
through  outer 
Lpane 


=  £ 
j-l 


absorption 
coefficient 
for  outer 
pane 


cosine 
of  angle 

of 

I 

J  j 

incident 

L 

j-l 


'absorption 

-  . 

•  . 

factor  of 

absorption 

cosine 

direct  solar 

k  _  6v  , 

coefficient 

,  x  < 

of  angle 

radiation 

for  inner 

of 

through  inner 
pane  . 

pane 

j 

incident 

J-l 


*  summation  of  six  variables. 


Statement  15.1:  surface  tilt  angle  >0.0;  i.e.,  surface  is  not  horizontal. 


. 


, 


. 


Figure  A2.  Continued 


SOLAR  16 


Variable  16.1:  Intensity  of  sky  diffuse  radiation  incident  on  surface. 


Equation  16.1: 


,r  ' 

*  1 

intensity  of  sky 

intensity  of 

diffuse  radiation 

>  -  « 

direct  normal 

incident  on 

solar 

surface 

radiation 

L  *  * 

*  , 

f  sky 

<  diffuse; 
l^f  actor  J 


Statement  16.1:  surface  tilt  angle  ^  90.0,  i.e.  surface  is  not 
vertical. 


Equation  16.2: 


< 


intensity  of 
sky  diffuse 
radiation 
incident  on 
surface 


► 


intensity  of 
direct  normal 
solar 
radiation 


f sky  \  ]  f /ground 

[diffuse]  x  Y>  +  <  reflectivity)  x 
\f actor  /  I  1  \  2.0 


/ sky 


*  si"CuuuJ 


? 


' 


* »  1 
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Figure  A2.  Continued 


SOLAR  17 


Variable  17.1: 


intensity  of  sky  diffuse  radiation  incident  on  surface. 


Equation  17.1: 


intensity  of 
sky  diffuse 
Eradiation 
incident  on 
surf ace 


f: 


sky 

| brightness  I 


*  16.2  and  16.5 


Variable  17.2:  intensity  of  ground  diffuse  radiation  incident  on  surface. 


Equation  17.2: 


intensity  of 
ground  diffuse 
radiation 
incident  on 
surface 


I  ground 
[brightness 


Variable  17.3:  intensity  of  total  solar  radiation  incident  on  surface. 


Equation  17.3: 


intensity 

'intensity 

of  total 

of  direct 

solar 

►  -  < 

solar 

radiation 

radiation  [ 

incident  on 

incident  on 

.surface 

.surface 

'intensity 

intensity  'I 

of  ground 

of  sky 

diffuse 

►  +  i 

diffuse 

radiation 

radiation 

incident  on 

incident  on 

.surface 

.surface 

. ,11.  Lilj 


Figure  A2 


Continued 


SOLAR  18 


Variable  18.1:  sol-air  temperature. 


Equation  18.1: 


I  ! 


sol-air 
I  temperature  f 


/outside 
<  dry-bulb 
^temperature 


intensity  of  total 
solar  radiation 
incident  on  surface 


r  /total  clouchl  % 

2  gil0.0  -  Vcover _ Ji 


Variable  18.2:  solar  heat  gain  factor  for  direct  solar  radiation. 


Equation  18.2: 


solar  heat 

intensity  of 

transmission 

gain  factor 

direct  solar 

factor  of 

for  direct 

>  = 

radiation 

X 

< 

direct  solar  1 

solar 

incident  on 

radiation 

radiation 

b  J 

surface 

for  windows 

.  , 

inward- flowing1 

absorption  ' 

fraction  of 

factor  of 

Jthe  radiation 
absorbed  by 

►  < 

direct  solar 
radiation 

the  inner  pane 

through  the 

b  d 

.inner  pane 

'inward- flowing' 

'absorption 

fraction  of 

factor  of 

Ithe  radiation 

►  < 

direct  solarl 

absorbed  by 

radiation  * 

the  outer  pane 

through  the 

b  „ 

outer  pane 

not»i  i« 


' 
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Figure  A2.  Continued 


SOLAR  19 


Variable  19.1:  solar  heat  gain  factor  for  diffuse  solar  radiation. 


Equation  19.1: 

solar  heat 

- 

intensity  of 

■-  “ 

intensity  of 

¥ 

gain  factor 

ground  diffuse 

sky  diffuse 

< 

for  diffuse 

►  = 

1 

radiation 

►  +  i 

radiation  l 

solar 

incident  on 

incident  on 

radiation 

surface 

surface 

± 1 '  . 

x 


transmission 
factor  of 
diffuse  > 

radiation  for 
windows 


+ 


inward -flowing' 

absorption 

fraction  of 

factor  of 

the  radiation 

►  1 

diffuse 

absorbed  by 

radiation 

the  inner  pane 

through  inner 

..window  pane 

inward  -f  1  owing' 
fraction  of 
the  radiation 
absorbed  by 
the  outer  pane 


'absorption  "^T 
factor  of 
diffuse 
y  '  radiation  ' 
through  outer 
^window  pane 


Variable  19.2:  solar  heat  gain  factor. 


' 

P  * 

Equation  19.2:  Isolar  heat  1 

solar  heat 

solar  heat 

jgain  factorj 

gain  factor 
for  direct 

►  +  < 

gain  factor 
for  diffuse 

solar  radiation 

solar  radiation 

-  s 

. 
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Figure  A2.  Continued 


SOLAR  20 


Note  20.1:  Insert  the  solar  output  data  Into  the  program  output 
matrix  after  determining  what  day  of  simulation  the 
data  represents. 

¥ 

Statement  20.1:  Are  all  days  of  simulation  completed? 

*  for  each  of  the  24  hours  of  the  day. 

**  for  each  outside  surface  of  the  building. 


Figure  A3.  Flow  diagram  for  subroutines  NAMEAl,  POLES,  MATRIX, 
ORIGIN,  POLYM,  SOLVN  and  FREQRE. 


NAMEAl,  POLES,  MATRIX,  ORIGIN,  POLYM,  SOLVN,  FREQRE:  Algorithms  to  derive 
the  z-transfer  function  coefficients  for  transient  heat  transfer  through 
walls  and  roofs. 


These  algorithms  are  not  flowcharted  here  as  they  have  been 
well  documented  previously  in  the  publication*  for  calculation  of  these 
functions.  These  subroutines  are  presented  in  Appendix  B  as  presented 
by  the  original  source  and  comments  are  left  exactly  as  presented  by 
the  National  Research  Council.  Only  minor  changes  were  made  in  subroutine 
NAMEAl; 

1.  The  subroutine  AIRCAV  was  called  whenever  the  program  read 
a  thickness  of  100  feet  for  a  component  (as  specified  for 
an  air  cavity).  The  parameters  transferred  into  AIRCAV 
were  the  thickness  of  the  air  cavity,  the  emissivity  factors 
for  the  surfaces  facing  the  air  cavity,  and  the  heat  flow 
direction  index  for  the  attic.  AIRCAV  then  calculates  the 
air  cavity  thermal  resistance. 

2.  The  program  assigns  variable  names  to  the  z-transfer  function 
coefficients  of  all  doors  walls  and  roofs  for  return  to  the 
mainline. 


*  Source:  Mitolas,  G.P.  and  J.G.  Arseneault.  1972.  Fortran  IV  program 
to  calculate  z-transfer  through  walls  and  roofs.  DBR  Computer  Program 
No.  33,  Division  of  Building  Research,  NRC,  Ottawa. 


Hi >*<*  >f**J  m  ** 


■ — 


157 


Figure  A4.  Flow  diagram  for  subroutine  AIRCAV. 

AIRCAV  1 


AIRCAV:  An  algorithm  for  determining  the  thermal  resistance  across  the  air  cavity  in  a 
pitched  roof. 


Variables. 1. 1 :  -  sum  of  outside  sol-air  temperatures  at  sloped  roof 

surfaces,  and 

-  sum  of  the  inside  ambient  temperature. 

}|sol-ai 

-E17  k 

t=  7 


Equation  1.1:  fsum  of 
<  sol-air 


i  17  Itemperature 


rsol-air 


at  east 
roof  slope 


+ 


temperature,, 
of  west 
roof  slope 


{sum  of  insidel  17  f inside  1 
ambient 
temperature 


=  E  \  dry-bulb  > 
t=7  (^temperature! 


where  t  =  time 


Variable  1.2:  average  sol-air  temperature  for  roof. 


rl  (* 

^temperature  >  =  ^temperature  J 


Equation  1.2:  (average  sol-air 
<  temperat 
[for  roof 


sum  of  sol-airl 
rat 
22 


Variable  1.3:  average  inside  ambient  temperature. 


Equation  1.3:  [average  inside 
{ amb i en  t 


(temperature 


ide"|  ft 


sum  of  inside  1 

ambient  temperaturej 

11 
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Figure  A4 


Continued 


CALCULATE 
Var.  2.1 
Eq.  2.1 


CALCULATE 
Var.  2.2 
Eq.  2.2 


CALCULATE 
Var.  2.3 
Eq.  2.3 


CALCULATE 

X 

Eq.  2.4 


AIRCAV  2 


Variable  2.1:  temperature  difference  across  the  air  space. 
Equation  2.1: 


■  T 

^  * 

r  'i 

temperature 

average 

average 

difference 

-  < 

sol-air 

inside  V 

[across  the 

temperature 

>  -  < 

ambient 

air  space 

for  roof 

temperature 

w  - 

Variable  2.2:  average  temperature  of  the  air  cavity. 
Equation  2.2: 


average 
temperature 
of  the  air 
cavity 


r  ^ 

r 

average 

average 

J  sol-air 

►  +  i 

inside  l 

temperature 

ambient 

.for  roof 

.temperature. 

Variable  2.3:  intermediate  variable,  DTL  3. 
Equation  2.3: 

DTL  3  = 

Equation  2.4:  x  =  log^  {dTL  3^ 


r  i 

temperature 

average 

difference 

temperature' 

[across  the 

of  the 

lair  space 

air  cavity 

,  i 


. 
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Figure  A4.  Continued 


AIRCAV  3 


Statement  3.1: 


fheat  flow] 
1  direction) 
' index  for | 
attic 


=  jupwardj 


Statement  3.2:  DTL  3  10. 


Variables  3.1:  values  of  Aq,  A^,  A^,  and  A^ 
of  resistance  across  the  air 


Values  3.1:  Aq  =  -1.77 

Ax  =  0.0 

a2  =  0.0 

A3  =  0.0 

Values  3.2:  Aq  =  -1.745 
Ax  =  -0.0028 
A^  =  0.0029 
A^  =  0.0008 


Values  3.3:  Aq  =  -1.5904 
=  0.2824 
Aj  =  0.0 
A3  =  0.0 


for  calculation 
space. 


*><  '  , 
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Figure  A4.  Continued 


AIRCAV  4 


■ 


Figure  A4 


Continued 


AIRCAV  5 


Equation  5.1: 


Equation  5.2: 


Variable  5.1: 


Equation  5.2: 


h 

c 


r 

/ temperature' 

< 1  +  0.0017  x 

(  difference 

1  across  the 
\air  space  y 

)-  50 

- \  / 

thickness  of  the  air  space 


h  =  0.00686  x 
r 


(average 
j  temperature 
| of  the 
(^air  space 
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100 


air  cavity  thermal  resistance. 
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1 _ 
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+ 

1 

femissivity 

emissivity ' 

of  the 
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facing 
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the  air 
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Figure  A5.  Flow  diagram  for  subroutine  START. 

START  1 


START:  An  algorithm  for  determining  convection,  radiation  and  heat  flux  for  each  surface  of 

a  building  component  and  then  solving  for  outside  and  inside  surface  temperatures 
for  the  first  seven  hours  of  simulation. 


* I COMP  =  1  for  walls, 

ICOMP  =  2  for  pitched  roof, 

ICOMP  =  3  for  horizontal  roof,  and 
ICOMP  =  4  for  doors. 

Variable  1.1:  inside  film  conductance. 


Variable  1.2: 

Variable  1.3: 

Variable  1.4: 

Variable  1.5: 


inside  film  conductance  for  walls. 


inside  film  conductance  for  pitched  roof. 


inside  film  conductance  for  horizontal  roof. 


inside  film  conductance  for  doors. 


<• 


Figure  A5.  Continued 
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START  2 


*  ICOM  »  1,  11  as  per  MAIN,  Note  9.2. 

**  for  first  7  hours  of  simulation. 


Variables  2.1:  heat  flux  history,  intermediate  variable  for  calculation 
of  radiation,  convection  and  heat  flux;  heat  flux;  and 
shortwave  and  longwave  radiation  for  both  surfaces  of 
the  building  component. 


Variables  2.2:  intermediate  variables  for  calculation  of  heat  flux  and 
surface  temperatures;  SUM  1,  SUM  2,  SUM  3,  SUM  4,  SUM  5, 
and  SUM  6. 


Equation  2.1:  SUM  1  =  I 

j=l 


T  ..  .  A. 
t-j  j 


SUM  2  =  £ 
j=l 


Ti,  t-j  Bj 


SUM  3  =  £ 
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j=l 


Ti,  t-j  °j 


T  B . 

°,  t-j  j 


SUM  5  =  £ 

j=l 


Qo,  t-j  ^ 


SUM  6  =  £ 


j=l 


Q  D 

Wi,  t,j  Uj 


where  T 


and  T.  .  are  the  outside  and  inside  surface 
t>  t-j 


o,  t-j 

temperature  for  time  t-j  ;  Q  and  Q.  are  the 

o,  t-j  1,  t-j 

outside  and  inside  heat  flux  for  time  t-j;  A.,  B.,  C. 

J.  j»  j 

and  Dj  are  the  z-transfer  function  coefficients  that  relate 
to  the  z- transforms  of  the  surface  temperatures  and  heat 
fluxes;  and  n  refers  to  the  number  of  z-trnasfer  function 
coefficients  that  exist  for  the  particular  component. 
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Figure  A5.  Continued 


START  3 


Note  3.1: 


[inside  surface 
[temperature 

[outside  surface 
temperature 


inside  dry-bulb 
temperature 


-  0.0 


INITIALIZE 
Note  3.1 


CALCULATE 
Vars.  3.1 
Eqs.  3.1 


IF  I COM 


Variables  3.1:  intermediate  variables  for  determination 
of  radiation  at  each  surface;  S22  and  S23. 


Equation  3.1: 


S22  =  0.1714  x  10“8  x 


S23  =  0.1714  x  10-8  x 


outside 
460  +  surface 

temperature 


3,10 


460  + 


outside 

temperature 


. 


•Jfti 
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Figure  A5. 


CALCULATE 
Vars.  4.1 
Eqs.  4.1 


CALCULATE 
Vars.  4.1 
Eqs.  4.2 


CALCULATE 
Vars.  4.1 
Eqs.  4.3 


Continued 


START  4 


Variables  4.1:  -  radiation  (longwave),  R 


-  radiation  absorbed  by  the  surface  (shortwave), 
*  for  outside  surface  at  time,  t 


Equation  4.1: 


t-O^ir  ““"‘l  XS22 


Lssivity  factor^ 

,  _  ("absorptivity  factor] 

5t  ~  |^for  wall  j 

[emissivity  factor 


solar  load  on 


I 


for  wall 


jeast  wall 
x  S23 


Equations  4.2: 


-  {“":inty  factor]  * s22 


absorptivity  factdr)  (solar  load  on 


for  wall 


i 


north  wall 


+  ^emissivity  factor]  ^  ^^3 


for  wall 


Equations  4.3: 


emissivity  factor] 
for  wall  r 


x  S22 


_  (absorptivity  factor]  (solar  load  on] 
t  -  |for  wall  J  X  ]south  wall  / 
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emissivity  factor] 
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x  S23 
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Figure  A5. 


CALCULATE 
Vars.  5.1 
Eqs.  5.1 


CALCULATE 
Vars.  5.1 
Eqs.  5.2 


CALCULATE 
Vars.  5.1 
Eqs.  5.3 


Continued 


START  5 


Variables  5.1:  -  radiation  (longwave),  R 


Equations  5.1: 


-  radiation  absorbed  by  the  surface  (shortwave),  S^* 
*  for  outside  surface  at  time,  t 


\  -  {““y  f*'tor}  *  ^ 

_  ) absorptivity  factor!  (solar  load  on 

t  [for  wall  J  x  [west  wall 

(emissivity  factor!  _ 

[for  wall  J  X 


Equations  5.2:  R  =  ^  , 

t  If or  roof 


[emissivity  factor^ 


x  S22 


s  _  (absorptivity  factor!  (solar  load  on 

t  [for  roof  |  [  east  roof  slope 


f; 


emissivity  factor! 


for  roof 


i 


x  S23 


Equations  5.3:  Rfc  =  (^roof^  faCt°r}  x  S22 

g  _  /absorptivity  factor!  ^  /solar  load  on 
t  ~  [for  roof  [ 

/emissivity  factor! 

*  1« 


for  roof  J  x  [horizontal  roof 


lfor  roof 


x  S23 
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Figure  A5.  Continued 


START  6 


Variables  6.1:  -  radiation  (longwave),  R  * 

-  radiation  absorbed  by  the  surface  (shortwave),  S  * 
*  for  outside  surface  at  time,  t 


Equations  6.1:  ^  x  S22 


emissivity  factorl 
for  roof  J 

absorptivity  factor^  _  /solar  load  on 

west  roof  slope 


,  _  /absorptivity  factorl  fs 

*t  -  |for  roof  J  X  Jvi 

{emissivity  factor^ 


|for  roof 


J 


x  S23 


*  pages  4.2,  4.4,  4.6,  5.2,  5.4  and  5.6 
Variable  6.2:  outside  surface  temperature 
Equation  6.2: 


< 


calculated 

outside 

surface 

temperature 


= 


outside 


(outside 
R  -  {film 
C  [coefficient  temperaturej 
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1 


x  surface 
[  temperature) 


St  +  SUM1  -  SUM2  -  SUM5 
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k  A 

surface 

-  A1 

temperature 

J 

Statement  6.1: 


absolute 
value 


outside 

surface 

temperature 


previous 

outside  >Q5 

surface  / — 

temperature/ 


**  iterative  procedure 

Note  6.1:  f 

I  outside  surface) 

] temperature  ( 


{calculated 
outside  surface) 
temperature  J 


■ 
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Figure  A5. 


CALCULATE 
Var.  7.1 
Eq.  7.1 


CALCULATE 
Var.  7.2 
Eq.  7.2 


Continued 


START  7 


Variable  7.1:  inside  surface  temperature. 


Equation  7.2: 


("inside 
<  surface 
[temperaturej 


longwave  I 
radiation^ 
at  inside 
surf ace 


["inside 
<  film 


inside 


1 


i  „  temperature 

^coefficient  r  J 


i 
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x  surface  ? 
temperaturej 


( shortwave 
} radiation 
at  inside 
surface 


+  SUM6  +  SUM3  -  SUM4 
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film  >  -  Cx 

coeff icientj 


Variable  7.2:  heat  flux  for  inside  surface. 


Equation  7.2:  fheat  flux'! 

(  for  inside?  = 
[.surface  J 


-  SUM3  +  SUM4 

^  /inside  surface 

1  (temperature 

g  ) outside  surface! 

1  (temperature 


-  SUM6 
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Figure  A5. 


calculate 

Var.  8.1 
Eq.  8.1 


CALCULATE 
Var.  8.2 
Eq.  8.2 


CALCULATE 
Var.  8.3 
Eq.  8.3 


Note  8.1 


Continued 


START  8 


Variable  8.1:  heat  flux  for  outside  surface. 


Equation  8.1: 


heat 
flux  for 
outside 
surface 


SUM1  - 

SUM2 

+  A^  x 

I  outside  surface 
I  temperature 

‘  ®1  X 

1  inside  surfacel 
| temperature  j 

-  SUM5 

Variable  8.2:  convection  at  outside  surface. 


Equation  8.2:  f convection!  ("outside 


i  i  I  j outside  outside 

<  at  outside  >  =  (film  >  x  (  .  .  -  surface 

(^surface  J  jcoef f icientj  empera  ure  texnperaturej 


Variable  8.3:  convection  at  inside  surface. 


Equation  8.3:  ("convection!  finside  1  finside  inside 

(at  inside  >  =  (film  >  x  l  .  -  surface  ! 

Lsurface  J  tcoef f icient J  emPera  ure  texnperaturej 


Note  8.1:  transfer  the  following  variables  into  the  solar  output 


matrix; 

-  longwave  radiation  (outside  surface), 

-  shortwave  radiation  (outside  surface), 

-  convection  (outside  surface), 

-  heat  flux  (outside  surface), 

-  surface  temperature  (outside  surface), 

-  surface  temperature  (inside  surface), 

-  heat  flux  (inside  surface), 

-  convection  (inside  surface),  and 

-  dry-bulb  temperature  (inside). 


■  1.  -  S  S 
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Figure  A5.  Continued 


START  9 


Note  9.1:  establish  new  temperature  and  heat  flux  history. 


*  for  the  first  7  hours  of  simulation. 


'  I 


« 


. 


Figure  A6 


Flow  diagram  for  subroutine  FLUX 


FLUX:  An  algorithm  for  determining  convection,  radiation  and  heat  flux 

at  each  surface  of  a  building  component  and  then  solving  for  the 
outside  and  inside  temperature  for  time  period  beyond  the  first 
seven  hours  of  simulation. 


Subroutines  FLUX  is  similar  to  subroutine  START  except  that  the 
temperature  and  flux  histories  do  not  have  to  be  established  prior  to 
subroutine  use.  Pages  FLUX  1,  FLUX  4,  FLUX  5,  FLUX  6,  FLUX  7  and  FLUX  8 
of  FLUX  are  the  same  as  the  respective  pages  for  START.  The  changes  that 
are  made  on  pages  START  2,  START  3,  and  START  9  to  arrive  at  FLUX  2, 

FLUX  3  and  FLUX  9  follow. 

FLUX  2:  -  no  initialization  of  heat  flux  history  required. 

-  do-loop  off-page  connector  2.2  from  9.2  is  not  required. 

FLUX  3:  -  change  in  Note  3.1  -  inside  surface  and  outside  surface 

temperatures  are  set  as  equal  to  the  respective  surface 
temperatures  at  time,  t-1  (one  hour  previous). 


FLUX  9: 


page  9  is  not  required;  return  after  page  8. 


. 


■ 
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Figure  A7.  Flow  diagram  for  subroutine  HPROD. 

HP ROD  1 


HPROD:  An  algorithm  to  calculate  the  sensible  heat  production  and  the  moisture  production 

of  the  confined  animals.  This  algorithm  applies  to  swine  and  must  be  altered  for 
other  livestock. 

Variables  1.1:  -  total  sensible  heat  production  for  all  hogs  of  all 

weights,  and 

-  total  moisture  production  for  all  hogs  of  all  weights. 

Statement  1.1:  [average  hog'] 

^weight  of  \  =  0.0 
[group  J 


Variable  1.2:  total  heat  production  per  hog  of  certain  weight. 
Equation  1.1: 


total  heat 
production 
per  hog  of  =  Antilog 
a  certain 
weight 


10 


2.477  +  0.34  (log10  (hog 
weight) ) 

-  0.00577  (inside  temperature) 

+  0.148  (log^Q  (hog  weight))^ 

+  0.000071  (inside  temperature)" 

-  0.00313  (inside  temperature) 
(log^  (hog  weight)) 


*  summation  of  a  maximum  of  ten  groups  of  hogs. 


< 


.linl)  ilO-OO.O  ♦ 


■ 
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Figure  A7. 


calculate 
Var.  2.1 
Eq.  2.1 


CALCULATE 
Var.  2.2 
Eq.  2.2 


CALCULATE 
Var.  2.3 
Eq.  2.3 


CALCULATE 
Var.  2.4 
Eq.  2.4 


Continued 


HP ROD  2 


Variable  2.1:  moisture  production  per  hog  of  a  certain  weight. 


Equation  2.1: 


moisture 
production 
per  hog  of 
a  certain 
weight 


Antilogio 


-  0.961  +  0.00291  (hog  weight) 

-  0.00785  (inside  temperature) 

-  0.0000146  (inside  temperature) 
(hog  weight) 

-  0.0000029  (hog  weight)^ 

+  0.0001375  (inside  temperature)^ 


{management  factor  for  moisture 
production 


Variable  2.2:  latent  heat  production  per  hog  of  a  certain  weight. 


Equation  2.2: 


[moisture  production  ) 


latent  heat 
production 

(per  hog  of  ^  =  1040  (per  hog  of  a  certain) 
a  certain  [weight  J 

weight 


Variable  2.3: 


sensible  heat  production  per  hog  of  a  certain  weight. 


Equation  2.3: 


r  i 

* 

' 

sensible  heat 

total  heat 

latent  heat 

management  j 

production 

production 

production 

factor  for 

per  hog  of  a 

►  =  < 

per  hog  of  - 

per  hog  of 

►  x  < 

sensible  > 

certain  weight 

a  certain 

a  certain 

heat 

weight 

k. 

weight 

production 

«■  «f 

Variable  2.4:  total  moisture  production  for  all  hogs  of  a  certain  weight. 


r  * 

Equation  2.4: 

i 

total  moisture 
production  for 

►  =  < 

moisture 

production 

►  x  < 

number  of 
hogs  of 

all  hogs  of  a 

per  hog  of 

/ 

that 

certain  weight 

^  * 

a  certain 
^weight 

weight 

^  - 
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Figure  A7.  Continued 


HP  ROD  3 


Variable  3.1: 


total  sensible  heat  production  of  all  hogs  of  a 


certain  weight. 


Equation  3.1: 


r  'I 

total  sensible 

sensible  heat  1 

number  of 

heat  production 

►  =  < 

production  per  [ 

hogs  of 

of  all  hogs  of 

hog  of  a  certain] 

that 

la  certain  weight 

weight 

weight 

Variable  3.2:  total  sensible  heat  production  of  all  confined  hogs 
of  all  weights. 


Equation  3.2: 


total  sensible 

total  sensilbe 

heat  production 

Un 

heat  production 

of  all  hogs  of 

w=  1 

of  all  hogs  of 

all  weights 

a  certain  weight 

- 

✓ 

where  w  =  weight  of  a  group  of  hogs,  and 
n  =  number  of  hog  groups 


Variable  3.3:  total  moisture  production  of  all  hogs  of  all  weights. 


Equation  3.3:  ("total  moisture 
(production  of 
]all  hogs  of 
[all  weights 


>=Zw=l 


total  moisture 
production  of 
all  hogs  of  a 
certain  weight 


Note  3.1:  assign  new  variable  names  to  total  sensible  heat 

production  and  total  moisture  production  of  all  confined 
hogs. 

*  summation  of  a  maximum  of  ten  groups  of  hogs. 
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Figure  A8.  Flow  diagram  for  subroutine  WALL. 

WALL  1 


WALL:  An  algorithm  for  determining  the  hourly  heat  transfer  through  the  structural  components 
of  the  confinement  unit. 


Variable  1.1:  instantaneous  rate  of  heat  admission  through  the  windows 
due  to  conduction  or  heat  flow  due  to  outdoor  -  indoor 
temperature  difference. 


Equation  1.1: 

rate  of  heat 

gain  through 

windows  due 

to  conduction 
*  - 

heat  transfer 

(outside 

inside  1 

i 

"1 

coefficient 
jof  windows 

>  x  < dry -bulb 

[temperature. 

dry -bulb  I 
tempera- j 
ture 

Variable  1.2:  total  heat  admission  through  the  windows. 


Equation  1.2: 


total  heat 
admission 
*  through  V 
the 

windows 


n 

Z 

w=l 


(shading 
!coef f i 


g  ) 

cientl 


{solar  heat 
gain  factor 
for  given 
orientation 


{rate  of  heat  gain! 
through  windows  \ 
due  to  conductionj 


W 


farea  of  the  windows! 
x  <for  a  given 
[orientation 


1 


where  w  =  windows  of  a  certain  orientation,  and 


n  =  total  number  of  orientations. 


. 


■ 
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Figure  A8.  Continued 


WALL  2 


Variable  2.1:  heat  flow  through  the  walls. 
Equation  2.1: 


[heat  flow' 

..  f 

[heat  flux  1 

[area 

area  of' 

( through 

<at  inside  > 

x  <of 

-  door  and 

[the  walls_ 

W=1 

[wall  surface] 

w 

[wall 

windows 

where  w  =  wall  surface  of  a  certain  orientation,  and 
n  =  total  number  of  orientations. 


Variable  2.2:  heat  flow  through  the  doors. 


Equation  2.2:  ("heat  flow! 

\  through  /  =  £n 
[the  doors  J  d=l 


{heat  flux  1  farea  1 

at  inside  /  x  <  of  > 
door  surf  acej  ^  [doorsj  ^ 


where  d  *  door  surfaces  of  a  certain  orientation,  and 
n  =  total  number  of  orientations. 

Variable  2.3:  heat  flow  through  the  roof  slopes. 

Equation  2.3: 


heat  flow 

heat  flux 

f< 

through 

,  -  E2  < 

at  inside 

x  I 

the  roof 

roof 

1 

slopes 

J 

r=l 

surface 

l 

r 

(slope  J 

where  r  =  roof  slope  of  a  certain  orientation 


■ 


fvciV 


bn*  ^o«s3a*|io  fi«* 


< 


! 


'  ~~ 
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Figure  A8.  Continued 


WALL  3 


Variable  3.1:  heat  flow  through  horizontal  roof. 
Equation  3.1 


heat  flow 
through 
horizontal 
roof 


= 


heat  flux 
at  inside 
roof 
surface 


{area  of  3 
horizontal^ 
roof  J 


Variable  3.2:  heat  flow  through  the  floor. 

fperimeterl 


Equation  3.2:  (heat  flow 
\ through 
Lthe  floor. 


.  STST"  x0.38 

{.floor  j  Itemoera 


inside 


[temperature  temperature! 


Variable  3.3:  total  heat  flow  through  the  structrual  components. 


Equation  3.3:  total  heat 


flow  through  I 
the  structural^ 
components 


[heat  flow') 
=  E  \ through  > 
K=1  Component J 


where  K  =  walls,  doors,  floor,  pitched  roof,  horizontal  roof 
and  windows. 


F 
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Figure  A9.  Flow  diagram  for  subroutine  VENTIL. 

VENTIL  1 


VENTIL:  An  algorithm  for  determining  the  psychrometric  properties  of  the  air  and  for 

determining  the  ventilation  rates  required  to  remove  heat  and  moisture  loads. 

Variable  1.1:  enthalpy  of  saturated  water  vapor  at  inside  temperature. 

Equation  1.1: 


enthalpy  of 
saturated 
water  vapor 
at  inside 
(-temperature 


(Inside 

►  =  1061  +  0.444  < dry-bulb  j 

[temperaturej 


Variable  1.2:  enthalpy  of  saturated  water  vapor  at  incoming  temperature. 


Equation  1.2: 


enthalpy  of 
saturated 
water  vapor 
at  incoming 
•temperature 


1. 


1061 


f incoming 
0.444  (dry -bulb 

[temperature.. 


Statement  1.1:  [incoming  wet-1 

\  bulb  >  >32 

Ltemperature  J 


SiiVi-rpnt-inp  PTOE: 


An  c-’gnrithm  for  a o t P rm i 3  the  saturation  pressure 
of  air  over  ice. 
parameters  in:  -  time,  and 

-  incoming  wet-bulb  temperatue 
parameters  out:  -  saturation  pressure  at  incoming  wet- 
bulb  temperature 


/ 


' 


Figure  A9.  Continued 


VENTIL  2 


Subroutine^  PH20: 


An  algorithm  for  determining  the  saturation  pressure 
of  air  over  liquid  water, 
parameters  in:  -  time,  and 

-  incoming  wet-bulb  temperature, 
parameters  out:  -  saturation  pressure  at  incoming  wet- 
bulb  temperature. 

inside 
dry  bulb 
temperature 

An  algorithm  for  determining  the  saturation  pressure 
of  air  over  ice. 
parameters  in:  -  time,  and 


-  inside  dry-bulb  temperature, 
parameters  out:  -  saturation  pressure  at  inside  dry-bulb 
temperature. 

An  algorithm  for  determining  the  saturation  pressure 
of  air  over  liquid  water, 
parameters  in:  -  time,  and 

-  inside  dry-bulb  temperature, 
parameters  out:  -  saturation  pressure  at  inside  dry- 
bulb  temperature. 


180 


Figure  A9.  Continued 


VENTIL  3 


Subroutine 
PICE 


Subroutine 
PH20 


CALCULATE 
Var.  3.1 
Eg.  3.1 


Statement  3.1:  f incoming  j 

<  dry-bulb  )  ^>  32 
l^temperaturej 

Subroutine  .PICE:  An  algorithm  for  determining  the  saturation  pressure 
of  air  over  ice. 
parameters  in:  -  time,  and 

-  incoming  dry-bulb  temperature 
parameters  out:  -  saturation  pressure  at  incoming  dry- 

bulb  temperature. 

Subroutine  PH20:  An  algorithm  for  determining  the  saturation  pressure 
of  air  over  liquid  water, 
parameters  in:  -  time,  and 

-  incoming  dry-bulb  temperature, 
parameters  out:  -  saturation  pressure  at  incoming 

dry-bulb  temperature. 

Variable  4.1:  actual  vapor  pressure  of  incoming  air. 

Equation  4.1:  I  vapor  pressure  l 
| of  incoming  airf 


“saturation 

f  ^ 

barometric  saturation 

pressure  at 

pressure  pressure  at 

incoming 

_ 

incoming  > 

wet-bulb 

wet-bulb 

.temperature. 

temperature 

t  * 

(incoming  incoming 

dry-bulb  -  wet-bulb 
temperature  temperaturej 


<  2800  -  1.3 


incoming 

wet-bulb 

temperature 


. 
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Figure  A9.  Continued 


VENTIL  4 


Variable  4.1: 

absolute  humidity  of  incoming  air,  grains/ lb. d. 

Equation  4.1: 

r 

absolute , 

Jvapor  pressure  1 

4 

humidity 

4354  x  [of  incoming  aitf 

of  incoming 

(barometric!  f'vapor  pressure  1 

air 

L  - 

[pressure  [  Jof  incoming  air] 

Variable  4.2:  specific  volume  of  incoming  air. 
Equation  4.2: 


[specific 
Ivolume  of 
incoming 
air 


•  [incoming 

'  <dry-bulb  > 

0.754  x  [temperature  +  459.  7  J  x 


r 

absolute 

humidity  l 

of  incoming 

1+ 

air 

4360  J 

barometric  pressure 


Note  4.1:  convert  absolute  humidity  of  incoming  air  from  grains  per  lb.d.a. 
to  lb  moisture  per  lb.d.a. 


Variable  4.3:  enthaply  of  incoming  air  at  incoming  temperature. 


Equation  4.3: 


{enthalpy  of 
incoming  air 
at  incoming 
temperature 


= 


{incoming 
dry-bulb 
temperature  J 


absolute 

enthalpy  of 

< 

humidity 

>  x  < 

saturated 

> 

of  incoming 

water  vapor 

air 

at  incoming 

- 

temperature 

v 


■ 


Figure  A9.  Continued 


CALCULATE 
Var.  5.1 
Eq.  5.1 


CALCULATE 
Var.  5.2 
Ro.  5.? 


CALCULATE 
Var.  5.3 
Eq.  5.3 


VENTIL  5 


Variable  5.1;  total  sensible  heat  load  within  the  confinement  unit. 


Equation  5.1: 


r  ^ 

total  sensible 

r  > 

total  heat 

r  *\ 
total  sensible 

heat  load 

transfer 

heat  production 

wi thin  the 

>  =  < 

through  the 

>  +  < 

of  the 

conf inement 

structural 

confined 

unit 

components 

animals 

. 

Variable  5.2: 


enthalpy  of  incoming  air  at  inside  temperature. 


Equation  5.2: 


(enthalpy 
J  of  incoming 
air  at  inside 


' 


temperature 


finside 

,24  < dry-bulb  > 
(^temperaturej 


absolute  1 
humidity  I 
incoming  [ 


air 


{enthalpy 
of  saturated 
water  vapor 
at  inside 

.  temperature 

Variable  5.3:  absolute  humidity  at  saturation  (inside  conditions). 


Equation  5.3: 

J 

"absolute 

humidity 

at 

0.622  x 

saturation  pressure 
at  inside 
dry -buib 
temperature 

saturation 
(inside 
„ conditions)^ 

(barometric i 

^pressure  J 

saturation  pressure 
at  inside 
dry -bulb 
temperature 

i  >in»^ 


■■  1  I¥S 
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Figure  A9.  Continued 


VENTIL  6 


Variable  6.1:  degree  of  saturation  for  ventilation  rate  required  to 
remove  moisture. 


Equation  6.1: 


'relative  humidity'] 
at  ventilation  i  f  barometric1] 

rate  required  to  (  (pressure  / 

.remove  moisture  J 


'  degree  of 
saturation 
for 

ventilation 
rate  required 
to  remove 
moisture 


'relative  humidity' 

saturation  pressure'' 

at  ventilation 

at  inside 

rate  required  to 

X 

dry -bulb 

(remove  moisture  , 

(temperature 

100.0  x 


J 


(barometric) 
\pressure  J 


'relative  humidity' 
at  ventilation 
rate  required  to 
^remove  moisture 


saturation  \ 
pressure  I 
x(at  inside  { 
Idry-bulb  j 
\temperature; 


Variable  6.2:  absolute  humidity  of  inside  air  at  the  ventilation  rate  required 
to  remove  moisture. 


Equation  6.2: 


absolute  humidity 
of  inside  air  at 
ventilation  rate 
required  to  remove 
,,  moisture 


^degree  of  \ 

saturation  for 
ventilation 
rate  required 
to  remove  y 

qioisture 


(absolute  humidity  > 
at  saturation 
(inside  conditions). 


f 
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Figure  A9. 


CALCULATE 
Var.  7.1 
Eq.  7.1 


CALCULATE 
Var.  7.2 
Eq.  7.2 


CALCULATE 
Var.  7.3 
Eq.  7.3 


Continued 


VENTIL  7 


Variable  7.1:  ventilation  rate  required  to  remove  moisture. 
Equation  7.1: 


ventilation  ^ 
rate 

required  to 
remove 
moisture 


f total  moisture^  (specific  volume) 
[production  J  x  (of  incoming  air] 


absolute  humidity! 
of  inside  air 
60  x  {  at  ventilation 

rate  required  to 
remove  moisture 


Variable  7.2:  ventilation  rate  required  to  remove  heat  load. 
Equation  7.2: 


(absolute  ' 
humidity  of 
incoming  air 


ventilation 
rate  required 
to  remove 
heat  load  J 


J 


w  * 

total  sensible 
heat  load 
within  the 
confinement 
unit 

V  ^ 

-  X 

specific 
volume 
of  the 
incoming 
air 

► 

60  x  < 

enthalpy  of 

incoming  air 
at  inside 
£emperature_ 

I 

enthaply 
incoming  air( 
incoming  [ 

^temperature^ 

Variable  7.3:  absolute  humidity  of  the  inside  air  at  ventilation 
rate  required  to  remove  the  heat  load. 


Equation  7.3: 


absolute 
humidity  of 
the  inside 
air  at 
ventilation 
rate  required 
to  remove 
the  heat  load 


N 


absolute 

humidity 

of 

incoming 

air 


rtotal  1 

moisture 

productionj 

H 

Ispecific  1 
(volume  ofl 
[incoming  ( 
air 

i 

("ventilation  rate) 

required  to 
[remove  heat  loadj 

• 
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Figure  A9.  Continued 


VENTIL  8 


Statement  8.1:  fventilation  rate' 
/  required  to 
I  remove  heat  load 


£0 


Variable  8..  1 :  degree  of  saturation  for  ventilation  rate  required 
to  remove  heat  load. 


Equation  8.1: 


degree  of 
saturation 
for  ventilation 
rate  required  to 
remove  heat  load 


►  - 


absolute  humidity  of 
the  inside  air  at 
ventilation  rate 
required  to  remove 
Iheat  load 


absolute  humidity  at' 
saturation  (inside 
conditions) 


Note  8.1: 


absolute  humidity  of 
the  inside  air  at 
ventilation  rate 
required  to  remove 
heat  load 


= 


absolute 
humidity  at 
( saturation 
( inside 
conditions) 


Statement  8.2: 


degree  of 
saturation  for 
ventilation 
rate  required 
to  remove 
heat  load 


►  <1.0 


Note  8.2: 


degree  of  saturation 
for  ventilation  rate 
required  to  remove 
heat  load 


=  1.0 


I 


. 


. 
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Figure  A9. 


CALCULATE 
Var.  9.1 
Eq.  9.1 


CALCULATE 
Var.  9.2 
Eq.  9.2 


CALCULATE 
Var.  9.3 
Eq.  9.3 


Continued 


VENTIL  9 


Variable  9.1:  relative  humidity  for  ventilation  rate  required  to 
remove  heat  load. 


Equation  9.1:  fdegree  of  saturation 

100  0  x  Jfor  ventilation  rate 
relative  of  required  to  remove 

humidity  for  heat  load 

■ 

(  ventilation 
rate  required  * 
to  remove 
_heat  load 

f  degree  of 

saturation 

L  for  ventilation 
rate  required 
to  remove 
heat  load 

.  x  < 

- 

saturation 
pressure  at 
inside  dry-l 
bulb 

temperature 

barometric 

pressure 

Variable  9.2:  absolute  humidity  at  saturation  (incoming  conditions). 


Eqaution  9.2: 


absolute 
humidity 
*  at  saturation > 
( incoming 
conditions) 


{saturation  pressure  1 
at  incoming  dry-bulb ? 
_ temperature _ j 

J  barometric"! 

[ pressure  J 


f saturation  pressure  'j 
at  incoming  dry-bulbl 
temperature 


Variable  9.3:  degree  of  saturation  (incoming  air). 


Equation  9.3: 


| degree  of 
saturation 
j ( incoming 
air) 


= 


absolute  humidity 

of  incoming  air _ 

absolute  humidity  at 

saturation  (incoming  conditions) 


. 


t  0.001 


-T*j>  *6-'** 


•i*»« 


,{.«Ol:»lb«<»  g/tiMMi)  oo !***«*•*  *»  *WW** 


■ 

. 
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Figure  A9.  Continued 


VENTIL  10 


Statement  10.1:  (degree  of  saturation!  ..  - 

j (incoming  air)  | Sl  * 


Note  10.1:  I  degree  of  saturation! 

.  j (incoming  air  j  *° 


Variable  10.1:  incoming  relative  humidity. 


Equation  10.1:  [incoming) 

\ relative  >  = 
[humidity J 


100.0 

(degree  of  saturation 
\( incoming  air 

1  - 

degree 

,  saturation 

(incoming 
air) 

H 

saturation  pressure  ] 

at  incoming  dry -bulb) 
temperature 

barometric  pressure 

Variable  10.2:  heat  load  necessary  to  insure  a  ventilation  rate  required 
to  remove  moisture. 


Equation  10.2: 


60  q  x  ("ventilation  rate  required! 

[_t°  remove  heat  load.  J 


J heat  load 

[enthalpy  of 

enthalpy  of 

n 

1  incoming  air 

►  -  < 

incoming  air 

| requirement  [ 

at  inside 

at  incoming 

> 

^  J 

temperature 

temperature 

^  j 

specific  volume  of  incoming  air 


(total  sensible  heat  load  within 
lihe  confinement  unit 


“] 


jj/ia  *»« 


. 


■ 
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Figure  A10. 


Flow  diagram  for  subroutine  PICE. 


PICE  - 


An  algorithm  for  determining  the  saturation  vapor  pressure  of  air  over  ice. 


Note  1.1:  convert  temperature  from  fahrenheit  to  centigrade  scale. 
’  °C  *  (°F  -  32)  x  5/9 


Note  1.2:  convert  temperature  to  absolute  temperature,  Kelvin. 
°K  =  273.16  +  °C 

Equation  1.1:  0  =  — ^o* ^ 


Variable  1.1:  saturation  vapor  pressure  of  air  over  ice,  atmospheres. 
Equation  1.2:  ("saturation] 

^9.096936  (0  -  1)— 

-3.56654  log^  (6) 

+0.8  7  68  1  7  (1  -  i) 

^2.2195983  _ 

Note  1.3:  convert  saturation  vapor  pressure  from  atmospheres  to  inches 
of  mercury. 

in.  Hg  =  atmospheres  x  29.921 


\  pi.  t  OOUi  c 

over  ice 


|c 


=  Antilog 


10 


ooUtwpJ 


' 
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Figure  All.  Flow  diagram  for  subroutine  PH20 


PH20:  An  algorithm  to  determine  the  saturation  vapor  pressure  of  air  over  liquid  water. 


Note  1.1:  convert  temperature  from  fahrenheit  to  centigrade  scale 
°C  =  (°F  -  32)  x  5/9 

Note  1.2:  convert  temperature  to  absolute  temperature,  Kelvin 
°K  -  273.16  +  °C 


Equation  1.1:  0  =  ---7ol16 


Variable  1.1:  saturation  vapor  pressure  of  air  over  liquid  water, 
atmospheres. 


Equation  1.2; 


saturation 
pressure 
over  liquid 
water 


'  =  Antilog 


10 


10.79586  (1  -  0) 

+  5.02808  log1Q  (0) 

+  1.50474  x  10~4 

(l_10-8.29692(±  -  1), 

+  0.42873  x  10"3 

(104.76955C1  -  0)_1) 

-  2.2195983 

Note  1.3:  convert  saturation  vapor  pressure  from  atmospheres  to  inches 
of  mercury. 

in.  Hg  =  atmospheres  x  29.921 


*/*»•  •farin'*  c3  *u,J***q«>3 
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APPENDIX  B:  SOURCE  PROGRAM  LISTING. 

Bl.  Main  Program. 


1 

2 

3 

4 

5 

6 

7 

8 
9 

10 
1  1 
12 

13 

14 

15 

16 

17 

18 


DIMENSION  C0EFK3),  A1  (  1 2  0  )  ,  A2  C  1 2  0  )  .  A3  (  1  2  0  )  .  B  1  (  1  20  )  .  B2  (  1 2  0  )  ,  B3 

1 (  120 ) .Cl (  120)  «C2( 120) »C  3  (  120) «D1  (  120)  «  D2(  120) .  03(  120 ) «TE( 120) » 
4P0L5 (ICO)  , AMI ( 150 ) ,AM2(  150)  .TEM1  (  1 20 ) . T EM 2 (  1 20 ) « TF(  1 20 ) , 
5G(120).Q(120).TW1<150).A(6).T(6)  .SA( 250 . 1 00) , OT ( 

124).ST(99.100) ,OW( 24) ,P0L3( 100) ,P0L4( 1 0 0 ) , SH (  1 20 )  . SQ( 1 20 ) , 

7P0L6C 100) • SE ( 120) .SW( 120) «SN(120).SS(120),WIN(120) ,WAL( 120) .DOR (12 
20 ) . FLO( 1 20 ) .ROF! 120 ) , ROOF ( 1 20 ) . QSUM{ 120). SB (80. 80). 

8SV(  100,  100)  . HOGWT ( 10 )  .HOGS( 10 ) , SENS(  120 ) , WM(  1 2 0 )  , AZ ( 1 2 0 ) , BZ(  1 2 
1 0) ,CZ( 1 20)  ,DZ( 1 20) .DAY( 5)  ,R MONTH (5)  .YEAR (5)  , EOT  I  ME ( 5 ) , DECLIN(5) . 
3VENT (150). C4(l 20 ).C5(120),RH 1(120). SUP( 120 ) . SUMO( 120 ) .  RH2( 1 20) . 

4 W  ALL  A ( 7 )  , WALLT { 7 } . I  ST  OP (7) ,EA(7) . EB(7).EC(7) ,HEATR( 150)  .8(  150}. 
5ATTD(  150)  ,ATTVK(  150) 

COMMON  A1.A2, A3.AZ. B1.B2.B3.BZ.C1 .C2.C3.CZ, 01 .02.03 ,DZ  » 

1 KXX.KXY.KXZ.KYX .AVH.SA 

REAL *8  Al. A2. A3 , B 1 , 8 2 , 8 3 , C 1 . C 2. C3. O 1 . D 2 . D3 . S A . A Z . BZ . CZ . OZ . A VH 
REAL  MGMT.MGMTS 

INTEGER  O.KKK.LLL.JJJ. Ill . 000 . RRR , SSS , YYY . ITIMES , IT  I  ME  »  S8  »  CCC 
1TTT.UUU 


19 

DATA 

SB  (  1  , 

1 ) , S  B ( 1 .2) 

.SB!  1 

3 ) / *CLOC • , • 

K  T I  •  ,  • 

ME 

•  / 

20 

DATA 

SB  (  2  , 

1 ) «  SB (2.2) 

.SB  (2 

3  )  /  •  SOLA*  ,* 

R  T  I  •  ,  • 

ME 

•/ 

21 

DATA 

SB  (3. 

1 ) ,SB(3,2) 

,  SB  (  3 

3)/* ALT  I* , • 

TUDE* . • 

■/ 

22 

DATA 

SB  (  4  , 

1  ) ,SB<  4,2 ) 

.SB  (4 

3)/ • AZ I M •  «  • 

UTH 

*  .  * 

•/ 

23 

DATA 

SB  (  5  , 

1 ) , SB (5, 2 ) 

.SB  (5 

3) /'D.  I •  ,  • 

NTEN* , • 

SITY*/ 

24 

DATA 

SB  (  6  • 

1 ) • SB (6,2) 

,  SB  (  6 

3 ) / • 0  I  RE  *  *  • 

CT 

B*  •  • 

EAM 

•/ 

25 

DATA 

SB(  7, 

1 )  «SB(7 ,2) 

.SB  (7 

3 ) /• SOLA* . • 

R  LO*  ,  • 

AO 

•/ 

26 

DATA 

SB  (  8  , 

1 ) ♦ SB ( 8.2) 

.SB!  8 

3) /*S.H .  •  »  • 

G.F 

.  *  .  * 

•/ 

27 

DATA 

SB  (  9  » 

1 ) . SB! 9.2) 

.SB  (9 

3)/* SOL. * . • 

A  IR* ,  • 

o 

•/ 

28 

DATA 

SB(  10 

.  1  )  .SB!  10, 

2)  .  SB 

1  0.3)/*  DRY 

1  t  * 

BULB 

•  # 

0*/ 

29 

DATA 

SB  (  1  1 

.  1 ) .SB!  1 1 . 

2).  SB 

1 1 . 3) /*  WET 

*  •  * 

BULB 

•  # 

O'/ 

30 

DATA 

SB(  12 

.  1 ) .SB! 12, 

2  )  .  SB 

12,3)/ *  LONG 

#  t  * 

.  RA 

•  t 

•D 

.  o*/ 

31 

DATA 

SB(  13 

. 1 ) .SBC  13. 

2)  .  SB 

13, 3)/*  SHOR 

T  RA 

• 

•D 

.  O'/ 

32 

DATA 

SB!  14 

.  1)  .SB!  14. 

2  ).  SB 

14,3)/*  CON  V 

S  1 

• 

• 

0*/ 

33 

DATA 

SB(  15 

. 1 ) .SB! 15. 

2)  .SB 

15.3)/*  HE  A  T 

*  •  * 

FLU 

•  # 

•X 

0*/ 

34 

DATA 

SB  (  16 

«1).SB(16, 

2  )  ,  SB 

16. 3 ) / • SUR . 

*  f  * 

TEM 

•  9 

•P 

.  0*/ 

35 

DATA 

SB  (  17 

. 1  ) »  SB (  17. 

2  ),  SB 

17,3)/*  SUR . 

*  f  ' 

TEM 

• 

•P 

.  I*/ 

36 

DATA 

SB(  18 

. 1 ) ,SB< 1 8. 

2  )  ,  SB 

1 8,3) /'HEAT 

*  t  * 

FLU 

•  # 

•  X 

I*/ 

37 

DATA 

SB  (  19 

. 1 ) .SB! 19 . 

2)  .  SB 

19,3)/*  CON V 

*  •  * 

• 

• 

I*/ 

38 

DATA 

SB(  20 

, 1 ) .SB! 20 . 

2  )  .SB 

20.3)/ 'DRY 

9  t  * 

BULB 

•  f 

I*/ 

39  READ! 5. 5008)  TNT , AVH . EW , A W, AR ,ER .UA • SC. RH 

40  5008  FORMAT! 1 X , F 3 . 0 ♦ F 3 .0 . 6F3. 2 ,F4 . 1 ) 

41  KKK=( TNT*24) +24 

42  READ(5«  5044)  ( HE ATP ( I ) , I = 1 , KKK ) 

43  5044  FORMAT (11 F7 .0 ) 

44  REAO( 5. 1 009)  { HOG WT ( I ) . I *1 , 1 0 ) 

45  1009  FORMAT! 10F3.0 ) 

46  READ  (5,1009)  ( HO  GS (I), 1  =  1.10) 

47  READ( 5,1008)  MGMT.MGMTS 

48  1008  FORM  AT ( 2F4  «  2 ) 

49  PEAD( 5.5045)  { B { I ) • 1=1 • KKK) 

50  5045  FORMAT! 16F5.2J 

51  RE AO (5,  1011  )  AN, AEWA, ATWA.ASWA. AWWA . AEDO . ATDO . ASDO , A WDO . AEW I . AT W I . 

52  1 ASWI , A WW I » AFLO.AROl .AR02. AR03 

53  1011  FORMAT! 17F4.0) 

54  RE AO( 5,102)  ( VENT( I ) • 1=1 ,KKK) 

55  102  FORMAT! 1 1F7.0  ) 

56  READ( 5, 222)  ERROR 

57  222  FORMAT ( F5. 2 ) 
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Continued 


READ (5. 21 )  COEF1 ,C0EFI! 1 ) ,COEF 1 ( 2 ) . COEF I ( 3 ) « E61 . EE2 
21  F0RMATI6F4.2) 

READ( 5,  40  0 )  I  ATT  I C 

400  FORMAT (13) 

DO  404  1=1, KKK 
ATTD( I)=0.0 
ATT W ( 1 ) =0  •  0 
404  CONTINUE 

IF  ( I  ATTIC. EQ.O)  GO  TO  401 
RE  AD (5,402)  (ATTDI I  )  ,1=1  »KKK) 

RE  AO ( 5, 4  0  2)  ! ATTW! I ) , 1=1 « KKK) 

402  FORMAT! 12F6.1  ) 

401  CALL  SOLAR! ET,DECL. PLAT , PLONG ,T ZN . DST , TNT, LO,CA»TX, 
l DAY , R MONTH, YEAR , EQT I  ME, DECL IN  « W ALLT , WALLA, EA , E8 , EC ) 

DO  910  1=1,20 
All  I )=0 
A2! I )=0 
A3! I )=0 
AZ! I )=0 
Bl ( I ) =0 
B2! I ) =0 
B3 ( I ) =0 
BZ! I ) =0 
Cl! I )=0 
C2 ( I )=0 
C3  !  I ) =0 
CZ! I ) =0 
D 1 ! I ) =0 
02! I ) =0 
D3 ! I )=0 
DZ! 11=0 
910  CONTINUE 

DO  5020  K= 1 , KKK 
AMI ! K ) =S A ! 1 0 , K ) 

TW1 ! K | =SA ! II , K ) 

IF  ! IATTIC.EQ.l)  GO  TO  410 

IF! AMI ! K  )  .LT  .60 .0  )  AM2!K)=65.0 

IF! AM 1!K). GE, 60.0)  AM2!K)=AMl!K)+5.0 

GO  TO  411 

410  IF  ( A  TTD ! K) . LT . 60 .0 )  AM2!K)=65.0 

IF  ! ATTDIK) .GE.60.0)  AM 2 I K ) =ATTD ! K ) ♦5. 0 

411  SA! 20 ,K)=AM2! K) 

5020  CONTINUE 

CALL  NAMEA1! EE1.EE2) 

DO  583  M= 1 , KKK 
TTT=0 
UUU=0 
CCC=0 
670  I Z=  1  2 

I COMP= 1 
I COM=0 

DO  121  1=1, KXX 
POL 3 (I)=A1!I) 

P0L4! I )=A2!  I) 

POL  5 ! I ) =A3!  I ) 

P0L6 ! I )= AZ! I ) 

121  CONTINUE 

584  IF  IM.GT.7)  GO  TO  999 
TEP  2=  AM2 ! 1 ) 

DO  122  1=1, KKK 
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Continued 


TEMl ( I ) =S A ( IZ-2 • I ) 

TEM2 (  I)=AM2(  1 ) 

122  CONTINUE 

CALL  ST  ART ( I COMP, I COM  »P0L3 • PCL4 , POLS , POL6 .TEMl ,TEM2 .TEP2, 

1  AM1.AM2.EW. AW,AR.ER,C0EF1,IZ.C0EFI) 

GO  TO  998 

999  CALL  FLUX ( M  » I  CO  VP , IC0W.P0L3, POL 4 , P0L5 , P0L6  * 

1  AMI , AM2, EW. AW, AR. ER .COEF1  ,  IZ.COEF I ) 

998  I Z  = I Z  +  20 

821  GO  TO  (584, 584, 584, 5e5,  584,586,587,584,584,584,570)  ,  ICOM 

585  DO  127  1=1, KXY 
POL 3 ( X ) =  B 1  €  I) 

POL 4 ( I )  =  B2(  I  ) 

POL  5  (  I  )  =  B3  (  I) 

POL 6 (I)=BZ(I) 

127  CONTINUE 
I C0MP=2 
GO  TO  584 

586  DO  126  1=1, KXZ 
POL 3 (I)=C1(I) 

POL 4  (I )  =  C2(  I) 

P0L5  (  I ) =C3( I) 

P0L6 ( I ) =CZ< I) 

126  CONTINUE 
I C0MP=3 
GO  TO  584 

587  00  125  1=1, KYX 
POL 3 ( I ) =D 1 ( I ) 

POL 4(1) =D2 (  I  ) 

P0L5 ( I ) =03( I ) 

P0L6 ( I ) =DZ< I ) 

125  CONTINUE 
I C0MP=4 
GO  TO  584 

570  CALL  WALL(M,UA, AM1.AM2.SC, AEWA, AT WA , ASWA , A W WA , AEOO . ATDO , 

1 ASDO ,AWDO,AEWI«ATWI , AS W I , AFLO. AROl , AR02 , AR03 , W AL .  DOR • FLO . ROOF , ROF , 
2WIN.QSUM) 

CALL  HPROD(HOGWT, HOGS. M GMT, M , AM2 . Q. G . MGMTS ) 

WM<  M) =G(  M) 


SENS( M)=Q(M) +HEATR(M) 

IF  ( IATTIC.EQ.O)  GO  TO  403 
IF  (CCC.EO.l)  GO  TO  403 
AMI <M)=ATTD(M) 

TW1 (M)=ATTW(M) 

403  CALL  VENTIL(M,AM2,AM1,TW1,B. QSU  M , 

1  SENS. WM ,RH,C4, C5. RH1 , SUP, SUMQ.RH2) 

0UT=C5(M)-VENT(M) 

PERC=ABS( OUT/ VENT ( M ) ) 

IF  (PERC.GT ,0.75.AND,RH2( M) . GT , 50 . 0 . AND . AM2( M).LT,75.) 
I  F  (PERC. GT. 0.50. AND. RH2( M)  .GT. 5 0 . 0 . AND . AM2 ( M ) .LT.75. ) 
IF  (PERC.GT .0.25. AND. RH2( M) . GT . 50 . 0 . AND . AM 2 ( M) .LT.75. ) 
IF  (PERC. GT.O. 15. AND. RH2(M) .GT.50.0. AND. AM2( M) .LT.75. ) 
CHANGE=0 • 1 
GO  TO  8004 

8000  CHANGE=3, 0 
GO  TO  8004 

8001  CHANGE=1 ,5 
GO  TO  8004 

8002  CHANGE=0 . 5 
GO  TO  8004 


GO  TO  8000 
GO  TO  8001 
GO  TO  8002 
GO  TO  8003 
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Continued 


8003  CHANGE=0.2 

8004  CHECK=VENT! M)*ERR0R 
DI FF2=C5 ( M ) -VENT ( M ) 

IF  (TTT.E0.1 .AND.UUU.EQ.l )  GO  TO  583 
IF  (A8S(DIFF2 ) .LE. CHECK)  GO  TO  583 
IF  (DIFF2.GT ,0.0)  GO  TO  668 
663  A M2 !M)=AM2!M) —CHANGE 
TTT  =  1 
CCC=  1 
GO  TO  670 

668  AM2!M)=AM2!M) +CHANGE 
UUU=1 
CCC=1 
GO  TO  670 
583  CONTINUE 
MM=1 
RRR=1 
SSS=20 
ICNT=0 

ITIMES=TNT+1 
DO  9010  YYY=1»ITIMES 
DO  652  NNN=1,7 
ITIME=1 

9011  WRI TE (6*1 95 )  0 AY(  ICNT  )  , RMONTH ( I CNT ) . YEAR ( I CNT ) , 

1 PLAT.PLONGtTZN .DST.LO.CA, TX 
195  FORMAT  C • 1 • «/////// 

1  • DAT  A  FOR •  «3  A4  •  •  LATITUDE  =»,F7.2**  LONGITUDE  =*,F7.2#» 

1  TIME  ZONE  =•  .  F3»  0 « •  DST=«,  F3.0#*  LOCATION  ».3A4) 

WRITE (6. 105)  EQT I  ME (  ICNT) »DECLIN(  ICNT) 

105  FORMAT! *0* . 'EQUATION  OF  TIME  =  • .F8.3t*  DECLINATION  =  •  ,  F8.3) 

WRITE (6. 29  5)  EA(NNN) • EB ( NNN ) *  EC ( NNN )  • W ALLT ( NNN ) . WALLA (NNN) 

295  FORMAT! • 0» .3A4, •  SURFACE  TILT  =*,F7.2»*  SURFACE  AZIMUTH  =».F7.2) 
0=1 

L=MM+ 1 

DO  1202  I=MM,L 

WRITE! 6. 1203)  ! SB ( O , J ) , J= 1 , 3 ) , ! SA ! I , J ) ♦ J=RRR,SSS) 

1203  FORMAT! • 0 3A4.20F6. 2) 

0=0+1 

1202  CONTINUE 
LL=L+ 1 
I I=LL+ 1 7 
DO  1204  I =LL • I I 

WRITE ! 6. 1205) ! SB! O, J )  . J  =  1 , 3 ) . ! S A! I • J ) . J  =  RRR,SSS) 

1205  FORMAT! *0* ♦3A4.20F6.1) 

0=0+1 

1204  CONTINUE 

IF  IITIME.EQ.2)  GO  TO  9015 
MM=I 1-19 
RRR=RRR+20 
SSS=SSS+4 
I T I ME=2 
GO  TO  9011 
9015  MM=MM+20 

RRR=RRR— 20 
SSS=SSS— 4 
652  CONTINUE 
MM=1 

I CNT  = ICNT  +  1 

RRR=RRR+24 

SSS*SSS+24 
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CONTINUE 

WRITE<6.558) 

FORMAT ( 5X  * •  *1 

WRI TE  (  6  «  558 ) 

WRITEI6.558) 

WRITE(6.6000) 

FORM  AT ( • O*  , • AREAS * . 3X , • AN • , 2X . • EW AL • , 2X . • NW AL • ♦ 2X . • SWAL •  • 2X. • WWAL* 

1 .  2X. • EOOR • * 2X.  • NDOR •  .2X , • SDOR' « 2X.  • WDOR* ,2X.*EWIN*.2X,*NWIN*  *2X  •  • S 
2W I N  •  »2X#  •  W  W I N  •  »  2X  »  • FLOR •  .2X. • NROF • « 2X, • SROF* • 2X  * ' HROF • ) 

WRI TE( 6.558) 

WRITE (6.917 )  AN. AEWA , AT WA , ASWA. AWW A. A EDO . ATOO *  ASDO * A WOO . AEWI .ATWI • 
1  AS W I »  AWW I . AFLO. AR01 . AR02.  AR03 
F0RMAT(5X» 1 7F6. 0 ) 

WRITEI6.558) 

WRITE(6.558) 

WRITE(6,6001 ) 

FORMAT! *0*  » 35 X . ■ HOURLY  HEAT  FLOWS  THROUGH  THE  STRUCTURAL  COMPONENT 
IS'//  28X.' WALLS* ,5X.* DOORS*  ,5X.* FLOOR*  , 2X . • HOR . ROOF* .2X,*PIT 

1 .ROOF* . 3X .* WINDOWS' »5X. • TOT AL * . 1 X . • HR • ) 

WRITE(6»558) 

DO  101  M=1 . KKK 

WRITE (6. 3012)  W AL ( M ) , DO R (M ) , FLO ( M ) , ROOF ( M ) , ROFC M ) .WIN( M) . QSUM( M) . M 
FORMAT ( 24 X  «  7F 10.2*13) 

CONTINUE 

WRITE(6.6003) 

FORMAT! • 1 • «25X. • HOURLY  VENTILATION  CRITERIA  CALCULATED  FOR  THE  MOO 
1  EL  HOG  BARN • //3X .  *VENT.( IN)*  »5X»  « VENT. M *. 3X .* RH. M *. 1 X .' VENT ,H* 

1  ,3X.  •  RH.H*  .3X.  •  SUPL.H*  .4X  .  'TOTAL*  .4X.  •  AN-f  H*  .  2X»*T.O*.3X«*T.I*. 

22X.  *WB.O*  »5X.*M* ,3X.*  HR  * . 3X . • RH . 0* ) 

WRI TE ( 6 • 558 ) 

DO  701  M=1 .KKK 

WRITE (6. 6 54 )  VENT ( M ) . C4 ( M ) , RH . C5 ( M ) , RH 1 ( M ) . SUP ( M ) ,SUMQ(M)  . 

1  SENS! M)  . AMI (M) , AM 2! M  )  .TW1 (M) , WM ( M) . M.RH2(M) 

F0RMAT(2X,F9. 0.3X.F9.0.F7.1 ,F7. 0.F7.1 .3F9.0.4F6. 1 . I3.F7. 1 ) 

CONTINUE 
CALL  EXIT 
STOP 
ENO 
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Subroutine  SOLAR. 


SUBROUTINE  SOLAR C ET , OECL ♦ PL AT , PLONG . TZN , DST . TNT , LO .CA . 

1  T  X  »  DA Y  « RMCNTH  »  YEAR*  EOT I  ME . OECL I N , WALLT , WALL A . EA. EB » EC ) 

01 MENS I  ON  AOUT ( 6 )  .T C 6 ) . OW ( 2 4 ) . OT ( 24 )  , ST ( 99 , 1 00 ) *  A  IN ( 6 ) • 

1  DAY ( 5 ) » RMONTH ( 5 ) .YEAR (5 ) , EOT  I  ME ( 5 ) , OECL I N { 5 ) . 

2  WALLT ( 7 )  . WALL A ( 7)  , I STOP( 7 ) ♦ EA <7 ) . E B ( 7 ) , EC ( 7 )  ,TC! 24) 

DOUBLE  PRECISION  SA<  250 .100). AVH. A1 ( 1 20 ) . A2 ( 1 20 ) . A3( 1 20 ) . AZ( 1 20 ) • 
1B1 ( 120) ,B2( 120) , B3< 120) ,BZ( 120) .Cl( 120) .C2( 120) .C3( 120) .CZ( 120) • 
101 ( 120) »D2C 120) ,D3! 120) *DZ(120) 

COMMON  A 1 ,A2. A3, AZ.B1.B2. B3. BZ. Cl . C2 , C3 . CZ . D 1 . 02 . 03 ,DZ . 

1 KXX.KXY.KXZ.KYX .AVH.SA 
INTEGER  CT 
REAL  NII.NIO 
I CNT=0 

RE  AD (5.85)  ( A  IN ( J  )  . J= 1 , 6.  1 ) 

RE  AD (5, 85 )  !A0UT!J),J=1«6,1) 

READ ( 5 , 85 )  ( T< J ) , J=1 .6. 1 ) 

85  FORMAT(6F10.5) 

RE AD (5, 5)  PLAT , PLONG  » TZN. OST .LO.CA.TX 
5  F0RMAT12  F7 . 2  « 2F  3.0, 3A4) 

DO  1105  1=1,7 

RE  AO (5,25)  WALLT (  I ) , WALLA (  I  ) . ISTOP( I ) , EA(  I ) . EB( I ) . ECC  I ) 

25  FORMAT ( 2F7 .2, I3.2X.3A4) 

1 105  CONTINUE 
9999  MM=1 

ADO IN  =  0. 

ADDOUT  =  0. 

TOO  =0. 

DO  100  J=  1  *  6 , 1 
S  =  FLOAT ( J ) —  1.0 
TDD  =  T ( J  )/ ( S  +2 • 0 )  ♦  TDD 
ADDOUT  =  AOUT(J)  /  IS  ♦  2.0)  +  ADDOUT 
100  ADO  I N  =  AINIJ)  /( S  +  2.0)  +  ADDIN 

TD  =  2.0  *  TDD 
ADIN  =  2.0  *  ADDIN 
APOUT=  2.0  *  ADDOUT 
RE  AD (5.95)  O.  X.  U.  Z 
95  FORMAT! F5.0 ,  3A4) 

DAY!  I CNT ) =X 
RMONTH! I CNT ) =U 
YEAR! I CNT ) =Z 

RE AD! 5, 15)  CN.CT.R.ARO.HO.NII ,NIO 
15  FORMAT !F4.1 , I1.F5.2.4F4.2) 

RE  AO ( 5 , 60 )  ! TC! I) .1  =  1 ,24,1) 

60  FORMAT! 24F2.0  ) 

REA015.35) ! OT(  I  ) ,  1  =  1,24,1) 

35  FORMAT! 12F5.1 ) 

RE  AD ! 5 . 3  6 )  ! OW !  I  )  .  I  =  1 , 2 4 ) 

36  FORMAT! 12F5. 1 ) 

W  =  6.2832/366.0 

ET=— 0.0002  +0.4 19 7* COS! WAD )  -3. 2265ACOS ! 2 . 0* WAD )  -0. 0903ACOS! 3. 04W 
1 *D )  —7. 3509*SIN! W*D )  -9 .3 91 2* SI N ! 2 . 0*W*D)  -0 . 3 36 1 *S IN! 3 . 0 *W*D ) 

EQTIME! I CNT ) =ET 

OECL=  0.302  -22.934C0S! WAD)  -0. 229AC0S! 2. 0*W*D )  - 0 . 243ACOS! 3. OAWAO 
1)  +3.8514SIN! WAD)  +0.002ASINI2.0AWAD)  -0. 0 554S I N ( 3 . 0* W*D ) 

DECLIN! I CNT ) =DECL 

AA  =  368. 44-24. 52*COS<  WAD) -1 . 1 4 AC OS ! 2 . 0 AW  AD ) - 1  .0904COSI  3.0  AW 
1  AD) +0.5800ASIN! W*D)-0.180  0*SIN! 2. OAWAO ) +  0. 2800 AS  I N!  3. OAWAO) 

B=0. 1717-0. 0344*C0S!W*D ) +0.00 324C0SI 2.0*W*D)+0.0024*COS( 3.0AW 
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Continued 


2*0)-0.0043*SIN(W*D)*0.0000*SIN<2.0*W*D)-0.0008*SIN<3.0*W*0) 
C=0.0905— 0.0410 *C0S ( W*D  )*0.0073*COS(2.0*W*D)+0.001 5*C0S<  3. 0*W 
3*D)-0.0034*SIN(W*D)+0.0004*SIN<2. 0*W*D  )-0.0006*SIN(3.0*W*0) 

DO  2100  I JK= 1  *  7 
DO  1400  1=1,99 
DO  1200  J=l,100 
ST (  I »  J )=0.0 
1200  CONTINUE 
1400  CONTINUE 

DO  1100  K=1 , 24 
TIME  =  FLOAT(K) 

STI22.K)  =0T(K) 

ST ( 24«K)=OW(K) 

ST( 1  »  K )  =  TIME 

BSTEP  =  — T  AN ( PLAT /57 • 29  6 ) 

HHSUN  =  ARCOS ( EST EP*T AN ( DECL/57 . 296 J ) 

HSUN  =  HHSUN  *  57.296 

HAD  =  15.0*(TIME  -  12.0  ♦  TZN  ♦  (ET/60.)  -  DSTJ  -  PLONG 
I F ( ABS( HAD)  -  ABS(HSUN) )51,51,1101 
1101  ST( 23, K) =OT ( K  J 
GO  TO  1100 

51  HA  =  (HAD/57.296) 

Y=HHSUN*< 12.0/3.1416) 

SRT=1  2.0-Y-t  ET/60  .  )-*TZN+DST  +  PLONG/15.0 

SST=24 . — SRT 

ST ( 2 , K )  =  HAD/15. 

DEC  =  DECL/57. 296 
BLAT  *  PLAT/57.296 

COSZ=SIN< ELAT ) *SIN< DEC)  +  COS ( BL AT ) *COS ( DEC ) *C OS ( HA ) 

ST ( 3 «  K )  =  ARCOS ( COSZ )  *  57.296 
COSW  =  COS(DEC)  *  SIN(HA) 

ST ( 4  ,  K )  =  ARCOS ( COSW ) *57. 296 

COSSS  =  <1.0  -  ( COSZ ) **2  -  (COSW) **2}**0.5 

SALT  =  ARSIN(COSZ) 

ST ( 6 • K )  =  SALT  *  57.296 

IF  (CT. EQ.O. AND. ST(6, K) .LE. 45.0)  GO  TO  101 
IF  (CT. EO.O. AND. ST(6, K) .GT. 45.0)  GO  TO  102 
IF  (CT.EQ.l. AND  ,ST(6»K)  .LE.45.0)  GO  TO  103 
IF  (CT.EQ.l. AND .ST(6,K) .GT.45.0)  GO  TO  104 
IF  (CT. EQ. 2. AND. ST(6,K) .LE.45.0)  GO  TO  105 
IF  (CT. EQ. 2. AND. ST(6.K) .GT.45.0 )  GO  TO  106 

101  CCM=0. S98+0. 00026*TC(K)+0. 0021  * < TC < K ) ** 2) -0. 00035* (TC(K) 4*3) 
GO  TO  107 

102  CCM=0.908-0.03214*TC(K)+0.0102*(TC(K)**2)-0.00114*(TC(K)**3) 
GO  TO  107 

103  CCM=0. 849-0. 01 277*TC(K) +0  ,0036*( TC( K ) **2) -0. 0  0  059*(TC<  K) **3) 
GO  TO  107 

104  CCM= 1. 0 1 0-0. 01394*TC(K)+0. 00553 *(TC(K)**2) -0.000 68*<TC(  K)**3) 
GO  TO  107 

105  CCM= 0.724-0. 00652*TC(K)+0.00191*(TC(K)**2) -0 . 00047* ( TC ( K ) **3 ) 
GO  TO  107 

106  CC M  =  0. 959-0. 0  230 4*TC(K) +0 . 0  0767* ( TC ( K ) **2 ) -0 .0 00  91 *( TC< K ) **3 ) 

107  IF (  COS ( HA )  -  T AN ( DEC /BLAT  )  )  11,11,12 

11  COSS  =  -1.0  *  COSSS 

ST ( 5  « K )  =  ARCOS(COSS)  *  57.296 

ST(7,K)=180.0-  ( ARS I N( COSW/COS( SALT ) ) ) *57. 296 
GO  TO  99 

12  COSS  =  COSSS 

ST ( 5 , K )  *  ARCOS(COSS)  *  57.296 
ST(7,K)=  ( ARSIN(COSW/COS( SALT)) ) *57. 296 
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1  30 
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1  33 

134 

135 
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1  38 

139 

140 

141 

142 

143 

1  44 

145 

146 

1  47 

148 

149 

1  50 

151 

1  52 

1  53 

1  54 

1  55 

156 

1  57 

l  58 

159 

160 

161 

162 

163 

164 

165 

1  66 

167 

168 

1  69 

170 

171 

172 

173 

174 

175 

176 

177 

178 
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Continued 


99 


212 

265 

112 


1  1 1 


200 


163 


1  692 


1  694 
1  693 


ST(9.K)»(AA*CN*CCM)  /EXP(B/COSZ) 

STC10.K)  «  C*ST(9.K)  /(CN**2) 

ST(ll.K)  a  R*(ST(  1  0 • K  )  ♦  ST (  9.K  ) *COSZ ) 

WT  =  WALLT(IJK)  /  57.296 
WA  =  WALL  A ( IJK)  /  57.296 
ALPHA  =  COS(WT) 

BETA  a  SIM  WA )  *  SIN(WT) 

GAMMA  =  COS(WA)  *  SIN(WT) 

COSINC  =  ALPH  A*  COSZ  ♦  BET  A*COSW  ♦  GAMMA4C0SS 
ST(15.K)  =  ARCOStCOSINC )  ♦  57.296 
IF( COS I NC.GT .—0 • 20 )  GO  TO  212 
ST (  1 2  «K  )  =  0.45 
GO  TO  265 

ST ( 1  2  »  K  )  a  0.55  ♦  0.4 37* COS INC  ♦  0 . 3 1 3*C0S INC**2 
IF  (COSINC. GT. 0. 0  )  GO  TO  111 
ST ( 16. K)  »  0.0 
TO  a  o. 

AOOUT=  0.0 
AOIN  a  o. 

GO  TO  163 

STC16.K)  =  ST ( 9 . K ) *C0S1 NC 
TO  =  0. 

AOIN  a  o. 

AOOUT  a  0. 

DO  200  Jal,6.1 

S  =  FLOAT ( J )  -  1.0 

TO  =  T ( J )  *  (COSINC**S)  ♦  TO 

AOOUT  a  AOUT(J)  *  ( COSINC**S)  4  AOOUT 

AOIN  =  AIN(J)*( COSI NC  **S )  ♦  AOIN 

ST(13»K)  a  TO 

ST ( 1 4  .  K )  a  AOIN 

ST ( 8  * K )  a  AOOUT 

IF  (WALLTCI JK)  .GT.0.0)  GO  TO  1692 
SKY=ST( 9.K) *C 
GO  TO  1693 

IF  ( W ALLT ( I JK) .NE.90 .0}  GOTO  1694 

SKYa  ST ( 9 . K ) * ( C*  ST (12«K)+( R/2 . 0) * (C+SIN( SALT ) ) ) 

GO  TO  1693 

SKYa ST { 10 ,K)*( ( 1 .0+ALPHA1/2.0I 
GRD=  ST(11»K)*((  1 . 0—  ALPHA ) /2. 0 ) 

ST ( 1 9  »  K ) =ST ( 1 6 . K ) +SKY+GRD 

ST ( 23.K)aOT(K)+( ARO*ST( 19.K) ) - < 2 . * ALPH A* < 1 0 . 0-TC < K ) J/HO) 
DOD=ST(  16. K) *(TO+NI I *AO  IN+N I O* AOOUT ) 

DD= ( SKY ♦ GRD ) * ( T C+N 10 *ADOUT +N I  I*AOIN) 

ST ( 20.K ) =DDD40D 


1100  CONTINUE 


IF 

( ICNT.EQ.O ) 

GO 

TO 

2099 

I  F 

( ICNT.EQ. 1 ) 

GO 

TO 

2017 

IF 

( ICNT.EQ.2) 

GO 

TO 

2018 

IF 

(  ICNT.EQ. 3) 

GO 

TO 

2019 

2  099 

JJ=  1 

KK= 

24 

GO 

TO  2026 

2  Cl  7 

J  J= 

25 

2018 


2019 


KK=48 
GO  TO 
J  J  =  49 
KK=72 
GO  TO 
JJ*73 


2026 


2026 


c\0  *  if  i 

n"  .  -  '  -■  l  >‘  - 


,  v<  •  ' 
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192 

193 

194 

195 

196 

197 

198 

199 

200 

201 

202 

203 

204 
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206 

207 

208 
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212 

213 

214 

215 

216 

217 

218 

219 

220 
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Continued 


KK«96 


2026  DO  2106  N*JJ. 

KK 

IF( ICNT. EQ.O J 

GO 

TO 

4017 

I F { ICNT.EO, 1 ) 

GO 

TO 

4018 

I F( ICNT. EG. 2) 

GO 

TO 

4019 

K=N-72 
GO  TO  4020 

4017  K=N 

GO  TO  4020 

4018  K=N— 24 

GO  TO  4020 

4019  K  =  N— 4 8 

4020  M=MM 
SA(M.N)=ST( 1 «  K ) 

M=HM+ 1 

SA<M.N)=ST(2,K) 

M=MM+2 

S A {  M  »  N)  =ST  (  6*  K) 

M=MM+3 

SA(M.N)=ST<7,Kj 
M=M  M+  4 

SA(M,N)=ST(9.K) 

M=MM+5 

SA(M,N)=ST( 16, K) 

M=MM+6 

SA( M,N) =ST( 19. K) 

M=MM+7 

SA(M,NJ=ST( 20, K) 

M=MM48 

SA(M,N)=ST( 23 ,K ) 

M=MM+9 

SA { M,NJ  =ST{ 22, K) 

MsMM+10 

SA(M,N)=ST(24,K) 

2106  CONTINUE 
MM=M410 
2100  CONTINUE 

6100  IF  ( ICNT.EQ.TNT )  GO  TO  9998 
ICNT=ICNT41 
GO  TO  9999 
9998  RETURN 
ENO 


• 

OU»*  KTe»fM*#OA8 
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3 

4 

5 

6 

7 

8 
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26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 


C 

C 

c 

c 

c 

c 

c 

c 

c 


c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 
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FORTRAN  PROGRAM  TO  EVALUATE  2-TRANSFORMS  FOR  CALCULATION  OF 
TRANSIENT  HEAT  TRANSFERS  THROUGH  MALLS  AND  ROOFS. 

THIS  PROGRAM  WILL  DERIVE  THE  2-TRANSFER  FUNCTIONS  FOR  TWO 
TYPES  OF  BOUNDARY  CONDITIONS  AND  THE  FORM  OF  BOUNDARY  PARAMETERS 
MUST  BE  SPECIFIED. 

BOUNDARY  CONDITIONS: 

OF  THE  FIRST  KINO?  (TEMPERATURE  GIVEN  FOR  BOTH  SURFACES). 


10 

C 

A) 

RAMP  INPUT 

ICASE=1 

1 1 

c 

B) 

FREQUENCY  RESPONSE 

ICASE=2 

12 

c 

13 

c 

OF  THE  SECOND  KIND? 

(FLUX  GIVEN  FOR  BOTH  SURFACES). 

14 

c 

A) 

STEP  INPUT 

ICASE=3 

15 

c 

B) 

RAMP  INPUT 

ICASE=4 

16 

c 

C) 

FREQUENCY  RESPONSE 

ICASE=5 

17 

c 

18 

c 

INPUT  to  program: 

19 

c 

CARD ( 1 )  DT  (F10.3) 

DT= SAMPLING  TIME  INTERVAL. 

20 

c 

CARD ( 2 ) * 

21 

c 

*  DESCRIPTION  OF 

THE  SLAB  FOR  TITLE  PURPOSE  ONLY 

22 

c 

CARD! 3) * 

23 

c 

24 

c 

CARD!  4)  * 

25 

c 

"  * 

C  ARO (  I ♦3 ) *  XL 
"  *  I 

"  * 
CARD ( M+3  ) * 

WHERE  XL= 
XK= 
D= 
SH= 
RES= 


( I ) . XK (I).D(  I). SH(  I) .RES (I ) • (TEXT ( I, J) . J= 1 .30)  WHERE 
INDICATES  THE  I • TH  LAYER  OF  THE  SLAB  < 5F1 O .4 . 30 A 1 ) . 


THICKNESS  OF  LAYER. 

THERMAL  CONDUCTIVITY. 

OENSITY. 

SPECIFIC  HEAT. 

RESISTANCE  OF  RADIATION  PATH  WHENEVER  APPLICABLE 
OR  THERMAL  RESISTANCE  OF  LAYER  WHEN  THERE  IS 
NEGLIGIBLE  HEAT  STORAGE. 

TEXT=DESCRIPTION  OF  LAYER.  A  SECOND  CARD  AND  SO  ON  CAN  BE 
USED  BY  INSERTING  ANY  INTEGER  IN  COLUMN  ONE(l). 
M=NUMBER  OF  LAYERS  THE  SLAB  IS  COMPOSED  OF. 
eLANK  CARD  TC  STOP  ABOVE  INPUT. 

ICASE.NW  (  I  1  ,  I  1  ) 

where:  NW=NUNBER  OF  FREQUENCIES  TO  BE  USED  WHEN 

FREQUENCY  RESPONSE  IS  INVOLVED. 

W(2)  iW(  3) . W(NW-t-l)  (8F10.4) 

ABOVE  CARD  ONLY  READ  WHEN  FREQUENCY  RESPONSE  IS 
INVOLVED.  (  ICASE=  2  OR  ICASE=5)  W( 1  )  IS  SET  TO  0.0 
W(I)'S  ARE  THE  PERIODS. 

nomenclature: 

RR=THICKNESS/THERMAL  CONDUCTIVITY  ( XL/XK ) 

OR  THERMAL  RESISTANCE  OF  LAYER  WHEN  THERE  IS 
NEGLIGIBLE  HEAT  STORAGE.  THEN  RES=0.0 
BETA* BET A=XL*XL*0*SH/XK 

CO=THERMAL  CONDUCTANCE  AND  USED  AS  1 /C • AT  THE  POLE  FOR  ICASE=4 
AFTER  A  RUN  IS  COMPLETED  CONTROL  RETURNS  TO  READING  CARD(l) 
THEREFORE  A  BLANK  CARO  IN  THIS  LOCATION  TERMINATES  THE  PROGRAM 


CARO ( M+4 ) 
CARDCM+5) 


CARD  (  M4-6 ) 


' 


.f8»3A''RU£  H? 99-  no*  WMT*  0«tK>3V  5HT 

,J*V«!7V.I  1KIT 


0  9»<r  ^  T  »X  ' 
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62 

63 

64 

65 

66 

67 

68 

69 

70 

71 

72 

73 

74 

75 

76 

77 

78 

79 

80 

81 

82 

83 

84 

85 

86 

87 

88 

89 

90 

91 

92 

93 

94 

95 

96 

97 

98 

99 

100 

101 

102 

103 

104 

105 

106 

107 

108 

109 

110 

1  1  1 

112 

113 

114 

115 

1 16 

117 

118 


201 


Continued 


SUBROUTINE  N AMEA 1 ( EE  1 . EE2 ) 

EXTERNAL  POLES . M ATR I X ,OR I G I N *  POLY M , A I RC AV .  SOLVO . FREQRE 
OOUBLE  PRECISION  RR ( 2 0 )  . B ET A ( 20 )  , XL ( 2 0 )  ♦ X K ( 2 0 )  . D ( 20 ) . SH ( 2 0 ) . 

9RES ( 20)  . ROOT ( 90  0 )  .FUNC( 90  0*4 )  ,DER (900.4) « ON ( 90 0 *  3 ) . MP ( 2 . 2 ) • 

8MPP (2*2) *  POL  1 (900 ) *  POL2 ( 900 ) . P0L3 ( 90 0 ) . POL 4 ( 900 ) *  POLS (900) . 

7P0L6( 900) ,MX(11.11).X(11),Y(11),Z(11).TEM1(2),TEM2(2) *TEM3(2) • 
6DT,C0.C1X,C1Y  «C1Z  »C2X*C  2Y  »  C  2  Z  »  T  » ARG 1  * ARG2 * PR EC . D ET , TEST , W ( 6)  * 

1  Al(  12  0)  .  A2(  120)  .  A3(  1  2 0)  , AZ{ 1 2 0)  . B1 ( 1 2 0 ) . B2 ( 1 20 ) . B3( 1 20 ) . BZ( 1 20 ) . 

2  Cl ( 120)  *C2(  120 ) »C3( 120) *CZ(  12  0) .0 1(  120) *D2( 120) *D3( 120) ,DZ( 120)  * 
3S A( 25  0* 100)  . AVH 

COMMON  A1 *A2*A3*AZ*B1  *82*  63 .BZtCl .C2.C3.CZ.D1 *02*  03  *DZ* 
1KXX,KXY»KXZ.KYX, AVH.SA 
COMPLEX* 1 6  A(6*2*2) . TEMP , TE MP 1 , TEMP2 . TEMP3 
INTEGER  CARD, PR INT , TEXT ( 2 0 , 30 ) . TEXT  1 ( 2 , 80 ) 

EQUIVALENCE  ( TEMP  1  *  TEM1 ( 1 )  ) * ( TE  MP2*  TEM2 ( 1 ) ) • ( TEMP 3, TEM3 ( 1 ) ) 

CAR0=5 
PR INT=6 
PREC=0 . 0 
W( 1 ) =0. 0 

1000  READ( CARD* 1 )  DT.ICOMP.ZZZ 

1  FORMAT (  F10.3.I2.F2.0) 

IF(DT.EQ.O.O)  GO  TO  2000 

READ (CARO. 2)  ( ( TEXT  1 (  I. J).J= 1.80), 1=1*2) 

2  FORMAT (  80  A 1  ) 

WRITE  (PRINT,  3)  (  (TEXTH  I*J).J=1.80).I=1*2) 

3  FORMAT ( • 1 • .///////////////27X.80A1/27X.80A1) 

WPITE(PRINT ,4) 

4  FORMAT { 1  HO,  ‘LAYER • •  1 X  .  • TH I CKNESS • , 4X . ‘CONDUCTIVITY* . 8X , • DENS  I TY • • 
1 8 X «  • SP  HEAT* . 11X. ‘RESISTANCE*  ) 

WRI TE (PRINT ,5) 

5  FORM  AT ( 2X  *  *  ‘,5X,‘  ‘,4X.‘  *.3X.‘ 

1 *2X* *  • ,2X • •  • *4X, ‘DESCRIPTION 

20F  LAYER*/) 

C0=0.0 

1=0 

DO  10  N= 1  *  40 
1  =  1  +  1 
M=I 

READ( CARD, 6 )  XL ( I  ) . XK ( I ) , D( I ) . SH ( I ) *  RES ( I ) *  (  TEXT (  I  *  J ) . J=1 .30) 

6  FORM  AT (  5F10.4.30A1) 

IF( XL( I ) *NE. 100)  GO  TO  2025 
CALL  A  I RCAV ( R  ES I , EE  1  *  EE 2*  ZZZ ) 

RES ( I ) =RES I 
XL ( I ) =0 . 0 

2025  IF( RES( I ) .EQ.0.0. AND.SH( I ) . EQ .0 . 0 . ANO. XL ( I ) .NE.O.O)  GO  TO  20 
IF( RES( I ) .EQ.0.0. AND.XL( I ) . EQ.0.0 )  GO  TO  30 
IF( XL( I ) .NE.O  .0  )  GO  TO  40 
RR( I )=RES( I ) 

BET  A( I ) =0.0 
GO  TO  50 

40  RR (  I ) =XL(  I )/XK(  I  ) 

BET  A( I )  =  XL ( I ) +D  SORT (D(I ) *SH(  I )/XK( I ) ) 

C0=C0+RES ( I ) 

50  C0=C0+RR ( I ) 

WRITE (PR  I  NT. 7)  I , XL ( I ) • XK (I).D(I)  *  SH ( I )  ,RES( I ) * ( TEXT ( I *J)*J=1*30) 

7  FORMAT! 1X*I3*F10.4,F15*4,F18.4,F15.4,F20.4*1 3X  *  30  A 1  ) 

GO  TO  10 

20  WRITE(PRI NT , 8  )  ( TEXT ( I . J ) . J= 1 . 30 ) 

8  FORMAT (95X.30A1 ) 

1  =  1-1 


• 
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1  44 

145 

1  46 

147 

1  48 

149 

1  50 

151 
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164 

165 
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168 
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10  CONTINUE 
M=21 

30  M=M  — 1 

DO  60  1=1. M 

IF( XL( I ) .NE.0.0)  GO  TO  60 
RES( I )  =  0.0 

60  CONTINUE 
C0=1 . 0/C0 
WRITE! PR  I NT . 1 ) 

WRITE (PRINT  *  1 ) 

THER=CO 

WRITE(PRINT .9)  CO 

9  FORMAT! 30X, • THERMAL  CONDUCTANCE.  U=' • F6 . 3 . 2X . • BTUS/HR  FT  FT 

1  DEGF  • ) 

WRITEIPRI NT . 1 ) 

WRITElPRINT.il)  DT 

11  FORMAT!39X. 'SAMPLING  TIME  INTERVAL.  DT= • • F9 . 3 . • HR.  •  ) 

WRI TE ! PRI NT . 1 ) 

READ! CARO. 12)  ICASE.NW 

12  FORMAT!  II.  II  ) 

N  W=N  W4- 1 
MW=NW*2-1 

IF! ICASE.NE.2 .ANO. ICASE.NE.5)  GO  TO  65 
READ! CARD. 13)  ! W! I ) . I =2 . NW ) 

13  FORMAT!  8F10.4) 

DO  61  1=2. NW 

61  W!I )=2.0*3.141 59265/ W ! I ) 

65  IF! ICASE.LT. 3)  GO  TO  70 

I  X=2 
JX=1 

GO  TO  80 
70  I X= l 
JX=2 

80  CALL  POLES1RR, BETA. RES. ROOT. DER.FUNC.M. IX. JX.DT. IROOT. ICASE) 
DO  90  1=1.900 
POL  1 ! I ) =0 . 0 
P0L2! I) =0.0 
POL  3! I )=0«0 
P0L4  !I )=0.0 
POLS  I  I ) =0.0 
90  P0L6  !  I  )  =0  .0 
MMM  =  1 
NNN=0 

POL 1(1)=1.0 
DO  100  1=1. IROOT 
POL  2!1)=1.0 

POL 2 ! 2) =-DEXP!  — ROOT  I  I )*DT) 

IF! DABS! POL 2  !  2 )  ) ,LT . 1 .0  D— 16 ) GO  TO  110 
CALL  POLYM! POL1 .POL 2  «NNN. MMM) 

100  CONTINUE 

110  IF! ICASE.LT. 3  )  GO  TO  120 
POL  2!1)  =  1.0 
POL 2 !2) =— 1 ,0 

CALL  POLYMCPOLl .P OL2 . NNN, MMM ) 

120  I D=NNN+ 1 

IF! ICASE. EQ. 2. OR. ICASE. EQ. 5)  GO  TO  130 
CALL  ORIGIN! RR. BET A.RES.M.MP.MPP) 

GO  TO! 140 .140.150.150.150), ICASE 
140  C1Y=— C0*C0*MP!1 .2) 

C1X-C1V+MP! 2,2)*C0 


c  »  ')  •• 
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1  91 
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196 
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198 
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2  0A 
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212 
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2  1  A 
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222 

223 

22A 
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229 
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231 
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23A 

235 

236 
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238 
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C1Z=C1Y«-MP( 1,1) *C0 
GO  TO  160 
150  C0=1.0/MP(2, 1 ) 

C1Y=-C0*C0*MPP( 2,1) /2 . 0 
C1X=MP(2,2)*C0+C1Y 
C1Z=MP(1  ,1  )  ACO-frC  1  Y 
160  C2X=0.0 
C2Y=0.0 
C2Z=0.0 

DO  170  1=1, IROOT 

IF( ICASE.GT. 1 )  GO  TO  180 

DN( I • 2) =1 . O/ROOT ( I ) /ROOT ( I)/DER( 1,2) 

GO  TO  200 

180  IF( 1CASE.EO.A)  GO  TO  190 

DN( 1,2) =— 1 , O/ROOT ( I ) /DER ( 1,3) 

GO  TO  200 

190  DN( I , 2 ) =1 . O/ROOT ( I )/ROOT( I ) /DER ( 1,3) 

200  DN(  I, 1  )=DN(  I.2)*FUNC(  I, A) 

ON( I ,3)=DN( I , 2) *FUNC( I , 1) 

IF< ICASE.NE. A)  GO  TO  170 
C2X=C2X-DN<  1,1) 

C2Y=C2Y-DN( 1,2) 

C2Z=C2Z— ON( I ,3) 

170  CONTINUE 

00  210  1=1,10 
210  POL  2(1) =  POL 1  (  I  ) 

IF( ICASE.EQ.3)  GO  TO  220 
POL3 { 1 J  =1 ,0/DT 
POL  3(2)=  — 2. O/OT 
POL 3 ( 3 ) = 1 , O/OT 
MMM=2 
GO  TO  235 
220  POL 3(1 )=1 .0 
POL  3(2) =  — 1,0 
MMM=1 

235  CALL  POL YM ( POL2  »POL3 , NNN, MMM ) 

POL  3(1 )=0.0 
POL3 (2) =0, 0 
POL3 ( 3) =0.0 
00  230  1=1.900 
1  1=  I 
T=I *DT 

DO  2A0  J= 1 • I  ROOT 

IF( ROOT(J)*T.GE.AO,  0)  GO  TO  250 

POL 3 (  I ) =P0L3 ( I ) +OEXP (  —  ROOT ( J ) *T ) *DN ( J . 1 ) 

POL  A  (  I  )  =  POL  A  (  I  )  +DEXP  <-ROOT<  J  )  *T  )  *DN(  J,2  ) 

POL  5 ( I ) =POL5 ( I ) +0  EXP (  — ROOT( J ) *T) *DN( J , 3 ) 

IF(J.LE.IO)  GO  TO  2 AO 

I F( DA8S(DEXP( —ROOT ( J ) *T )*DN(J»2)  i.LT.l.OO— 16)  GO  TO  250 
2A0  CONTINUE 

250  IF( ICASE. EQ. A )  GO  TO  260 
P0L3 ( I ) =P0L3 ( I ) +C0AT+C1 X 
POL A (  I  )  =  POLA ( I ) +C0AT+C1Y 
POL 5 ( I ) =POL5 ( I ) +C0*T+C1 Z 
GO  TO  270 

260  POL  3(1) =POL  3(I)+C0*T*T  /2 . 0  +  C IX *T+C 2X 
POL A ( I ) =POL A ( I ) +C0*T*T  /2  .0  +  C1YAT  +C2Y 
POL 5(1) =POL 5 ( I )+C0*T*T  /2 . 0+C 1 Z *T*C2Z 
270  IF(I.LE.IO)  GO  TO  230 

I F( DABS ( POLA ( I ) ) . LT . 1 . OD— 16 )  GO  TO  280 
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230  CONTINUE 

280  MMM  = I  I  —  l 

IF< ICASE.LT.3)  GO  TO  281 
DO  282  1=1.899 
11=901-1 

POL  3 ( 1 1 ) =POL3 ( I  1-1 ) 

P0L4 (II  ) =POL4 {  1 1— 1 } 

282  P0L5( II) =P0L5( I  I  — 1 ) 

POL3 ( 1 ) =0 . 0 

IF(XLCM).EQ.O.O)  P0L3(1 )=RR(M) 

POL  4 { 1 )  =  0.0 
POL 5 ( 1 }=0.0 

I  F ( XL ( 1 J.EQ.O.O)  POLS (1 )  =  RR( 1 ) 

MMM=MMM+1 

IF( ICASE.EQ.4)  POL3C1)=0.0 
I F (  ICASE.EQ.4)  POL5(1)  =  0.0 

281  NN=NNN+1 

DO  290  1=1. NN 
290  POL  6(1) =POL  2(1) 

CALL  POLY  M( POL6 .POL 3 . NNN,  MMM ) 

NN1 =NNN+ 1 
DO  300  1=1. NN1 

300  P0L3 ( I ) =P0L6 ( I ) 

DO  310  1=1. NN 
310  POL 6 ( I ) =P0L2 (  I  ) 

NNN=NN— 1 

CALL  POLYPI P0L6.PCL4 , NNN. MMM) 

NN2=NNN+1 
DO  320  1=1 . NN2 
320  POL  4(1) =P0L6  C I ) 

DO  330  1=1. NN 
330  POL 6 ( I ) =P0L2 ( I ) 

NNN  =NN— 1 

CALL  POLYMI POL6 .POL 5 .NNN. MMM ) 

NN3=NNN+ 1 
DO  340  1=1. NN3 
340  P0L5 ( I ) =P0L6(  I  ) 

GO  TO  350 

130  DO  360  1=1. MW. 2 
DO  360  J  =  1 » MW 
I F (  I  .EQ.l  )  GO  TO  370 
K=( 141 ) /2 

MX( I  * J) =DS I N(  ( J-l  )*DT*W(K)  ) 

GO  TO  360 
370  MX(I.J)=1.0 
360  CONTINUE 
LW=  MW— 1 

DO  380  1=2, LW. 2 
DO  380  J= 1 , MW 
K=I/2+l 

380  MX(  I . J) =DCOS(  ( J-l  }*DT*W( K  )  ) 

381  CALL  SOLVDI MX ,1 1 • MW , MW.PREC.DET, TEST ) 

CALL  FPEQRE  ( RR , BET A , RES . XL . XK, D . SH , M , W . A . N W ) 

DO  390  1=1. MW. 2 

I F ( I. EQ.l)  GO  TO  390 

K=< I+l )/2 

ARG 1=0, 0 

ARG2=  0.0 

DO  410  J=1 .ID 

ARG1*ARG1 +POL1 ( J ) *DCOS( (J-l )*DT*W(K) ) 
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410  ARG2= ARG2— POL  1 ( J)*DSIN( ( J-l  )*0T*W(K) ) 
TEMP=DCMPLX( ARG1 «  ARG2 ) 

IF( ICASE.EQ.2)  GO  TO  420 
TEMP1=TEMP*A(K»2»2)/A(K»2»1 ) 
TEMP2=TEMP/A(K,2, 1 ) 

TEM  P3  =  TEMP*  A ( K  •  1 •  1 )/A(K,2,l  ) 

GO  TO  430 

420  TEMPl=TEMP*A(K,2.2)/A(K.l ,2) 
TEMP2=TEMP/A(K,1 ,2) 

TEMP3=TEMP*A(K,1 « 1 )/A(K» 1 ,2) 

430  X( 1-1 )=TEM1 ( 1 ) 

X< I >=-TEMl (2) 

Y( 1-1 )  =  TEM2( 1  ) 

Y ( I )=-TEM2( 2) 

Z( 1-1 )=TEM3( 1 ) 

Z( I )=-TEM3( 2| 

390  CONTINUE 

IF( ICASE.EQ.2)  GO  TO  391 
X( 1 )=0. 0 
DO  392  1=1. M 

392  X(1  )=X(  1 )+SH(  1)40(1  ) *XL( I  ) 

X ( 1 )=-DT/X( 1 ) 

Y(1 )=0.0 
DO  394  1=1.10 
394  Y< 1 )=Y{ 1 )+I*POLl ( 1+1 ) 

X( 1 )=X( 1 )*Y( 1 ) 

Y ( 1 )=X< 1 ) 

Z< 1 )=X( 1 ) 

GO  TO  393 

391  ARG 1=0.0 

DO  440  J=1,ID 
440  ARGl=ARGl+POLl < J) 

TEMP=DCMPLX<  ARG1 .0.0D+01 ) 

IF( ICASE.EQ.2)  GO  TO  450 
TEMPI =TEMP*  A (  1.2. 2) /A (1,2,1) 
TEMP2=TEMP/A{ 1.2,1) 

TEMP3=TEMP*A<  1.1,1) /A (1.2.1) 

GO  TO  460 

450  TEMPI =TEMP*  A(  1,2,2)/A(1.1  ,2) 
TEMP2=TEMP/A<  1,1.2) 

TEMP3=TEMP*A( 1,1,1) /A (1,1. 2) 

460  X ( 1 ) =TEM 1(1) 

Y ( 1 )=TEM2( 1 ) 

Z ( 1 ) =TEM3 ( 1 ) 

393  DO  470  1=1, MW 
P0L3 (  I  ) =0 .0 
P0L4 ( I ) =0 • 0 

470  P0L5 ( I ) =0  •  0 

DO  480  1=1, MW 
DO  480  J= 1 »  MW 

POL3 ( I ) =P0L3 ( I ) +MX( I. J)*X( J) 

POL 4 ( I ) =P0L4 ( I ) +MX( I.J)*Y( j) 

480  POL 5 ( I ) =P0L5 ( X ) +MX(  I.J)*Z(J) 

NN1 =MW 
NN2=M W 
NN3=MW 

IF( ICASE.NE.5)  GO  TO  350 
NN 1=NN 1+1 
NN2=NN2-f  1 
NN3=NN34l 
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DO  481  1*1*14 
J=1 6—  1 

POL 3 ( J) =PCL3< J-l ) 

P0L4 ( J ) =P0L4 ( J— 1 J 
481  P0L5( J) =PCL5( J-l J 
POL3 !  1  ) =0 . 0 
P0L4 ( 1 ) =  0  • 0 
POL  5(1 ) =0.0 

350  IF! ICASE. EQ. 3)  GO  TO  490 

IF( ICASE.EQ.2 .OR. ICASE. £Q  .5  )  GO  TO  500 
WRITE (PRI NT  *14) 

14  F0RMAT(44X, • COEFFICIENTS  FOR  RAMP  INPUT*) 

GO  TO  510 

490  WRITE(PRINT»15) 

15  F0RMAT(44X, 'COEFFICIENTS  FOR  STEP  INPUT') 

GO  TO  510 

500  WRITEIPRI NT  *16) 

16  F0RMAT(44X, 'COEFFICIENTS  BY  FREQUENCY  RESPONSE*) 

DO  501  1=2. NW 

501  W{ I  )  =  2.0*3. 141592  65/W ( I ) 

WRITE! PR I  NT . 22 )  ( W( I )  ,  I =2 , NW ) 

22  FORMAT!  • 0*  *20X, 'PER IODS *  * 8F 1 0 . 1 ) 

510  WRITE!PRINT, 1 ) 

IF! ICASE. GT. 2)  GO  TO  520 
WRITE(PR I NT  *17) 

17  FORMAT !14X**J**18X* • D/B • • 1 9X *  • 1 /B  * . 1 9X.  *A/B' * 17X  » • D! Z ) • ) 
GO  TO  530 

520  WRITEIPRI NT  *18) 

1 8  FORMAT ! 14X*  *J*  *  1 8  X  » • D/C  *»19X.  *1/C* . 19X, • A/C  * . 17X. *D! Z) • ) 
530  NN=MIN0!NN1 .NN2.NN3) 

N=MAX0!NN, ID) 

DO  540  I = 1 »  N 
J=I-1 

IF! I . L E . IO, AND, I . LE • NN )  GO  TO  550 
IF! NN.LT . ID )  GO  TO  570 
GO  TO  560 

570  WRITEIPRINT. 19)  J.POL1II) 

19  FORMAT! 9X, I6,68X.F20. 6) 

GO  TO  540 

560  WRITEIPRI NT  *21)  J  .  PCL3 ! I ) . P0L4 ! I ) . P0L5 ! I ) 

21  F0RMATI9X. I  6 « F24 . 6 . F22 . 6 , F22 . 6, F 20 . 6 ) 

GO  TO  540 

550  WRITEIPRINT, 21)  J  *P0L3! I ) *P0L4!  I  ) .POLS ! I ) *P0L1 ( I ) 

540  CONTINUE 
C  COEFFICIENTS 

C  WALL  A1.A2.A3.AZ 

C  PITCHED  ROOF  B1.B2.B3.BZ 

C  HORIZONTAL  ROOF  C1.C2.C3.CZ 

C  DOORS  D1.D2.D3.DZ 

GO  TO  1301.302. 303, 304 ) . I COMP 

301  DO  24  1=1, N 
A1 ! I ) =POL  3 !  I  ) 

A2 1  I ) =P0L4 I  I  ) 

A3! I ) =POL5! I ) 

AZ! I )=POL 1  I  I ) 

24  CONTINUE 
KXX=N 

GO  TO  1000 

302  DO  28  1*1 ,N 
81! I )=POC3! I) 
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B2(  I  )*P0L4< I ) 
B3( I )=P0L5< I ) 
BZ ( I  )=POLl (1 J 
28  CONTINUE 
KXY=N 

GO  TO  1000 

303  DO  26  1=1, N 
Cl(  I ) =POL  3(1) 
C2< 1 )=P0L4( I ) 
C3{ I ) =POL5  C I ) 
CZ< I)=P0L1 (I) 

26  CONTINUE 
KXZ  =  N 

GO  TO  1000 

304  DO  27  1=1, N 
D1 (  I  J=P0L3( I ) 
D2( I )=P0L4( 11 
03( I )=P0L5(I J 
DZ ( I )=P0L1C I) 

27  CONTINUE 
KYX=N 

GO  TO  1000 
2000  WRITE(PRI NT , 3  J 
RETURN 
END 
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C  SUBROUTINE  POLES ( RR • BET A . RES . ROOT . DER * FUNC • M . I  I  *  I J • OT • I ROOT  * ICASE) 

C 

C  SUBROUTINE  TO  CALCULATE  THE  ROOTS  OF  THE  HEAT  TRANSFER  MATRIX 

C  AND  WILL  STORE  THE  VALUE  OF  THE  FUNCTIONS  AND  THE  FIRST  DERIVATIVE 

C  AT  THE  ROOTS. 

C 

C  THE  MAXIMUM  NUMBER  OF  ROOTS  THAT  CAN  BE  OBTAINED  IS  SET 

C  AT  ONE  HUNDREO( 900 ) 

c 

C  THIS  METHOD  WILL  FIRST  FIND  A  ROOT  BETWEEN  30.0/DT  AND 

C  100.0/DT,  BEING  ASSUMED  THAT  A  ROOT  EXIST  IN  THIS  INTERVAL.  THIS 

C  ROOT  IS  ALSO  LARGE  ENOUGH  TO  GIVE  SUFFICIENT  ACCURACY  TO  EVALUATE 

C  THE  RESPONSE  FACTORS. 

C  THE  METHOD  CHECKS  THE  INTERVAL  BETWEEN  THE  ORIGIN  AND  THIS 

C  FIRST  ROOT  AND  WHEN  ANOTHER  ROOT  IS  FOUND  THE  INTERVAL  NEXT  TO  BE 

C  CHECKED  BECOMES  THE  INTERVAL  BETWEEN  THIS  NEW  ROOT  AND  THE  NEXT 

C  LARGEST  ROOT  AND  SO  ON.  WHEN  NO  ROOT  EXIST  IN  AN  INTERVAL  THE  NEXT 

C  SMALLEST  INTERVAL  IS  SELECTED  AND  SO  ON  WORKING  TOWARDS  THE  ORIGIN 

C  UNTIL  ALL  ROOTS  ARE  FOUNO. 

C  TO  CHECK  FOR  A  ROOT  THE  METHOD  SUBDIVIDES  THE  INTERVALS  IN 

C  RELATIVELY  LARGE  SEGMENTS  AND  CHECKS  FOR  BOTH  A  CHANGE  IN  SIGN  OF 

C  THE  FUNCTION  AND  FOR  TWO  CHANGES  IN  DIRECTION  OF  THE  SLOPE  OF  THE 

C  FUNCTION.  IF  A  ROOT  EXIST.  BY  MAKING  THESE  TWO  CHECKS,  IT  IS 

C  INDICATED  SO  IN  A  RELATIVELY  SHORT  TIME.  ONCE  IT  IS  INDICATED  THAT 

C  A  ROOT  OOES  EXIST  IN  A  CERTAIN  SEGMENT  OF  AN  INTERVAL.  THIS 

C  SEGMENT  IS  FURTHER  SUeDIVIOED  AND  USING  A  SIMILAR  ROUTINE  AS  ABOVE 

C  EXCEPT  CHECKING  FOR  A  CHANGE  IN  SIGN  OF  THE  FUNCTION  ONLY.  IF  ON 

C  THE  FIRST  PASS  A  CHANGE  IN  SIGN  IS  NOT  FOUND  THE  SEGMENT  IS  FURTHE 

C  SUBDIVIDED  INTO  EVEN  SMALLER  PARTS  UNTIL  A  CHANGE  IN  SIGN  DOES 

C  OCCUR.  ONCE  A  CHANGE  IN  SIGN  OCCURS  THE  ROOT  IS  ARRIVED  AT  BY 

C  SPLITTING  THIS  INTERVAL  SUCCESSIVELY  IN  HALF  USING  THE  NEW  SEGMENT 

C  WITH  FUNCTION  VALUE  OF  OPPOSITE  SIGN  UNTIL  A  ROOT  IS  REACHED 

C  WITHIN  AN  ACCURACY  OF  10-14. 

C  THE  SPLITTING  OF  THE  SEGMENTS  TO  ARRIVE  AT  A  ROOT  IS  USED 

C  BECAUSE  A  RELATIVELY  CONSTANT  NUMBER  OF  ITERATIONS  ARE  REQUIRED 

C  TO  OBTAIN  THE  ACCURACY  WANTED.  IN  THE  CASE  OF  THE  REGULA  FALSI 

C  METHOD  IT  WAS  FOUND  THAT  THE  NUMBER  OF  ITERATIONS  VARIED  FROM  AS 

C  LOW  AS  FIVE  (5)  TO  MOPE  THAN  THREE  HUNDRED  (300)  ITERATIONS.  IN  TH 

C  LONG  RUN  IT  WAS  FOUND  THAT  THE  SPLITTING  OF  THE  POINTS  REQUIRED 

C  LESS  RUNNING  TIME. 

C 

c  nomenclature: 

C  RR=TH I CKN ESS/ THERMAL  CONDUCTIVITY  (XL/XK) 

C  OR  THERMAL  RESISTANCE  OF  LAYER  WHEN  THERE  IS 

C  NEGLIGIBLE  HEAT  STORAGE 

C  BETA*BETA=XL*XL*D*SH/XK 

C  WHERE  D=DENSITY. 

C  SH=  SPEC I F  IC  HEAT. 

C  RES=RES I  STANCE  OF  RADIATION  PATH  WHENEVER  APPLICABLE. 

C 

C  ROOT=CO  NT  A I  NS  THE  ROOTS  OF  THE  HEAT  TRANSFER  FUNCTIONS 

C  ON  RETURN. 

C  DER  =  CONT AINS  THE  DERIVATIVE  OF  THE  HEAT  TRANSFER  FUNCTIONS 

C  AT  THE  ROOTS  ON  RETURN. 

C  FUNC=C ONT AINS  THE  VALUE  OF  THE  HEAT  TRANSFER  FUNCTIONS 

C  AT  THE  ROOTS  ON  RETURN. 

C 

C  M=NUMBER  OF  LAYERS  THE  SLAB  IS  COMPOSED  OF. 
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59 

c 

60 

c 

II  ANO  IJ  ARE  THE  ROW  AND  COLUMN  SUBSCRIPTS  OF  THE  ELEMENT  OF 

61 

c 

THE  MATRIX  FOR  WHICH  THE  ROOT  IS  FOUND. 

62 

c 

I  1=1* 

63 

c 

*  BOUNDARY  CONDITION  OF  THE  FIRST  KIND. 

64 

c 

I  J=2* 

65 

c 

66 

c 

11=2* 

67 

c 

*  BOUNDARY  CONDITION  OF  THE  SECOND  KIND. 

68 

c 

* 

*■* 

II 

*-4 

69 

c 

70 

c 

DT=T I ME  INTERVAL  OF  SAMPLING 

71 

c 

72 

SUBROUTINE  POLES ( RR . BET A . RE S . ROOT . DER . FUNC . M . I I  .IJ.DT, I  ROOT.  I CASE) 

73 

DOUBLE  PRECISION  RR ( 20 ) . B ET A ( 20 ) . RES ( 20 ) . ROOT ( 90 0 ) . DER ( 90 0 . 4 ) , 

74 

1 FUNC ( 900,4) ,F(2 .2) , FF ( 2 . 2 ) . R 1 .R 2 . R3. FI , F2 . F3 , FP 1 .FP2.FP3.RTEMP, 

75 

2FTEMP.DT 

76 

DO  10  1=1.900 

77 

DO  20  J= 1 »  4 

78 

FUNC( I , J ) =0 .0 

79 

20 

DER (  I, J)=0.0 

80 

1  0 

ROOT ( I ) =0.0 

81 

LAST=0 

82 

R1 =30 . 0/DT 

83 

R3= 100. 0/DT 

84 

IF( ICASE.E0.4)  R 1 =450 .0/0 T 

85 

I F ( I  CASE. EQ • 4 )  R3=700.0/DT 

86 

IROOT=0 

87 

DO  30  I IR00T=1. 1800 

88 

IROOT=IROOT+l 

89 

I F (  I  ROOT . EQ • 1 )  GO  TO  40 

90 

c 

FOLLOWING  IS  THE  ROUTINE  CHECKING  FOR  A  CHANGE  IN  THE  SIGN  OF  THE 

91 

c 

FUNCTION  AND  ALSO  FOR  TWO<2)  CHANGES  IN  DIRECTION  OF  THE  SLOPE.  TO 

92 

c 

FIND  WHETHER  A  ROOT  EXIST  OR  NOT. 

93 

300 

CALL  MATRIX (RR. BETA, RES. Rl.M.F. FF.2) 

94 

F 1  =  F (  II, IJ) 

95 

FP 1 =FF ( I I.IJ) 

96 

IC  =  0 

97 

DO  50  1=1,20 

98 

R2=R1+(R3-R1 ) /20.0*I 

99 

CALL  M ATRIX(RR, BETA, RES.R2.M.F, FF.2) 

100 

F2  =  F (  II , I J| 

101 

FP2  =  FF< I  I. I J) 

102 

IF(Fl.GT.O.O)  GO  TO  60 

103 

I F ( F2  «LE • 0.0)  GO  TO  70 

104 

GO  TO  80 

105 

60 

I F ( F2  .LE.O. 0)  GO  TO  80 

106 

70 

IF(FPl.GT.O.O)  GO  TO  90 

107 

IF( FP2.GT.0.0)  GO  TO  100 

1  08 

GO  TO  110 

109 

90 

IF(FP2.GT.0.0)  GO  TO  110 

110 

100 

IC=IC+1 

1  1  1 

IFC IC .EQ. 2)  GO  TO  80 

112 

110 

FI  =F2 

113 

FP 1=FP2 

1  14 

50 

CONTINUE 

115 

I  ROOT  = I  ROOT-1 

1  16 

LAST=LAST— 1 

1  17 

120 

IF( LAST. EQ.O )  GO  TO  130 

118 

IF( LAST. NE. 1 )  GO  TO  125 

. 
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141 
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1  44 
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147 
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149 
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151 
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153 
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1  55 

156 
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158 
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164 

1  65 

166 
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169 

170 

171 

172 

173 

1  74 

175 
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177 
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R1*0.0001/DT 
GO  TO  140 

125  Rl=ROOT(LAST-l ) 

140  R3=R00T (LAST) 

Rl=Rl+0. 00001 /DT 
R3=R3-0.00001/DT 
GO  TO  30 
80  R3=R2 
4  0  N=1 

CALL  MATRIX (RR . eETA . RES .R 1 • M, F. FF,  1  ) 
F1=F( II ,1  J) 

DO  150  I =N  *  25 
NN=1 0*1 
DO  160  J=1,NN 
R2=R1+J*(R3-R1)/NN 

CALL  MATRIX! RR, BETA.R ES . R2. M. F.FF , 1 J 


F2= 

FI 

[I  I.  IJ 

) 

IF! 

FI 

•GT.O. 

0) 

GO 

TO 

170 

IF! 

F2. 

.LE.O. 

0) 

GO 

TO 

160 

GO 

TO 

190 

170 

IF! 

F2  , 

.LE.O. 

0) 

GO 

TO 

190 

GO 

TO 

160 

190 

RTE 

MP: 

=( Rl+R 

2) 

/2.0 

CALL  MATRIX (RR. EETA  ,R ES . RTE MP . M . F * FF . 1 J 
FTEMP=F(  I  I , I J ) 

IF(FTEMP.EQ.O.O)  GO  TO  200 
IF! FTEMP. GT.0.0 )  GO  TO  210 
IF(F1 .GT.0.0  )  GO  TO  220 
F1=FTEMP 
R1=RTEMP 
GO  TO  230 
220  F2=FTEMP 
R2=RTEMP 
GO  TO  230 

210  IF(F1 .GT.O.OJ  GO  TO  215 
F2=FTEMP 
R2=RTEMP 
GO  TO  230 
215  F1=FTEMP 
R1=RTEMP 

230  I F (  DABS( (R1-R2)/R1 )-1.0D-14  .GT.0.0)  GO  TO  190 
200  CALL  MATRIX (RR. BETA.R  ES  »R2»M»F»  FF  »  2 } 

GO  TO  240 
160  CONTINUE 
150  CONTINUE 
WRITEI3. 1  ) 

1  FORMAT! ' OUNABLE  TO  FIND  A  ROOT  AFTER  INDICATION  THAT 
ID*  ) 

CALL  EXIT 

240  DO  250  1=1 » I ROOT 
J=I+1 

IF! R2  .GT. ROOT! I ) )  GO  TO  250 
J=  I  +1 


GO  TO  260 
250  CONTINUE 
260  LAST=LAST+1 

IF! IROOT.EQ. 1 )  GO  TO  270 
JJ= I ROOT+1 
DO  280  I=J. I ROOT 
JJ* JJ-1 
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Continued 


ROOT ( JJ ) *ROOT ( J  J— 1 J 
DO  280  K*l,4 
OER ( J J.K)=DER( J J-l . 
280  FUNC< JJ.K)=FUNC( JJ- 
270  J=J-1 

ROOT ( J ) =R2 
DO  290  K=l»4 
KX=(K+1 )/2 
KY=K/KX 

DER( J.K)=FF(KX,KY J 
290  FUNC( J.K) =F(KX,KY) 
GO  TO  120 
30  CONTINUE 
130  RETURN 
END 


K) 

l.K) 
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B5.  Subroutine  MATRIX. 
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SUBROUTINE  M ATR 1 X ( RR . BET A , RES  * W . M . F , FF. ICONT) 

C 

C  SUBROUTINE  TO  CALCULATE  THE  HEAT  TRANSFER  MATRIX  FOR  A  SLAB* 

C  AND  THE  DERIVATIVE  OF  THIS  MATRIX. 

C 

C  IF  I CONT= 1  THE  ROUTINE  CALCULATES  HEAT  TRANSFER  MATRIX  ONLY. 

C  IF  ICONT=2  THE  ROUTINE  CALCULATES  HEAT  TRANSFER  MATRIX  AND  ITS 

C  DERIVATIVE. 

C 

c  nomenclature: 

C  RR=THI CKN ESS/THERMAL  CONDUCTIVITY  tXL/XK) 

C  OR  THERMAL  RESISTANCE  OF  LAYER  WHEN  THERE  IS 

C  NEGLIGIBLE  HEAT  STORAGE. 

C  BET  A* BET  A=XL*XL*D*SH/K. 

C  WHERE  DsDENSITY. 

C  SH=  SPEC  I F I C  HEAT. 

C  RES  =  RES 1ST ANCE  OF  RADIATION  PATH  WHENEVER  APPLICABLE. 

C 

C  W=VALUES  ALONG  THE  AXIS  FOR  WHICH  THE  MATRIX  OR  THE  MATRIX 

C  ANO  DERIVATIVES  ARE  FOUND. 

C  M=NUMBER  OF  LAYERS  THE  SLAB  IS  COMPOSED  OF. 

C  F=CONT A I N S  THE  VALUE  OF  THE  HEAT  TRANSFER  MATRIX  ON  RETURN 

C  FF  =  CO  NTA I  NS  THE  VALUE  OF  THE  DERIVATIVE  ON  RETURN. 

C 

OOUBLE  PRECISION  RRI20) ,BETAl20).Flt20.2.2),F2t20.2»2) *F3(20.2*2)* 
IF (2. 2). FFt 2. 2) »R£S( 20) »P»R»  ALPHA • SQ • W»TEMP .TEMPI 
DO  10  1=1. M 
P=DSQRT ( W 1 *  BET  A (  I J 
R=RR (  I  ) 

ALPHA=BETA< I ) 

SO=D  SORT ( W) 

IF(P.NE.O.O)  GO  TO  20 

C  ELEMENTS  OF  THE  MATRIX  FOR  LAYER  I  WHERE  THERE  IS  NEGLIGIBLE 

C  HEAT  STORAGE. 

Fit  I ,1,1 J=1.0 

Fit  1.1*2) =R 

Fit  1.2.1 )=0.0 

F 1 1 1 »  2. 2)  =  1 .0 

IFt ICONT.EO. 1 )  GO  TO  10 

C  DERIVATIVES  OF  THE  ELEMENTS  OF  THE  MATRIX  FOR  LAYER  I  WHERE  THERE 

C  IS  NEGLIGIBLE  HEAT  STORAGE. 

F2t 1.1, 1 )=0.0 
F2  t I , 1,2) =0 • 0 
F2t 1.2. 1 )=0.0 
F2t I  *  2  »  2 ) =0 . 0 
GO  TO  10 

C  ELEMENTS  OF  THE  MATRIX  FOR  LAYER  I  FOR  HEAT  TRANSFER  BY  CONDUCTION 

C  ONLY. 

20  FI t  I.  1  ,  1  ) =DCOSt P) 

Fit  I  ,  1 , 2)=R/P*DSINtP) 

Fltl.2.1) =— P/R4DS INt  P ) 

Fltl.2.2) =F 1 t 1.1.1) 

IFt  ICONT.EQ. 1 )  GO  TO  30 

C  DERIVATIVES  OF  THE  ELEMENTS  OF  THE  MATRIX  FOR  LAYER  I  FOR  HEAT 

C  TRANSFER  BY  CONDUCTION  ONLY. 

F2t  1,1.1 )  =  ALPHA *DS INt ALPHA*SQ)/2.0/SQ 

F2t I . 1 , 2)=-R*DCOSt  ALPHA *SQ) /2 .0/W+R4DS INt  ALPHA4SQ ) /ALPHA/2. O/SQ/SQ 
1  /SQ 
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Continued 


F2( I , 2. 1 )  *  ALPHA*  ALPHA  *DCOS(  AL  PH  A  *SQ  )  /  2  .  O/R-f  D  S  IN  (  ALPHA*SQ )/2.  O/SG* 

1 ALPHA/R 

F2< 1.2, 2)=F2( 1.1,1) 

30  IF(RES(  I ) .EO.O.O  )  GO  TO  10 

ELEMENTS  OF  THE  MATRIX  FOR  LAYER  I  WHERE  THERE  IS  HEAT  TRANSFER  BY 
CONDUCTION  AND  THERMAL  RADIATION  USING  CONDUCTION  PART  FROM  ABOVE. 
TEMP=1.0/(F1(  I, 1 »  2  )  +RES { I  )  ) 

F1(I,2»1)=(F1(I»2»1) *RES( I)+2.0*F 1(1,1, 1 )-2. 0)*TEMP 
FI ( 1.1 , 1 )=(F1 ( I . 1  .1 )*RES(  I)+F1( I. 1,2) )*TEMP 
Fl( I ,2,2) =F 1(1, 1,1) 

F1(I, 1, 2) =F 1(1, 1,2) *RES ( I ) *TEMP 
IF( ICONT.EO. 1 )  GO  TO  10 

DERIVATIVES  OF  THE  ELEMENTS  OF  THE  MATRIX  FOR  LAYER  I  WHERE  THERE 
IS  HEAT  TRANSFER  BY  CONDUCTION  AND  THERMAL  RADIATION  USING 
C  CONDUCTION  PART  FROM  ABOVE 

TEMP 1 =F2 ( I. 1,2) *TEMP 

F2( 1,2, 1)=(F2( I ,2,1 ) *RES ( I ) +2 ,0 *F2 ( I , 1 , 1 ) ) *TEMP-F1( 1,2.1) *TEMP1 
F2(  I ,1 , 1)=(F2(I  ,1  ,1  )*RES(  I) +  F2( 1.1,2) )*TEMP-F  1( 1,1,1) *TEMP1 
F2( 1,2,2) =F2(  1,1,1) 

F2(  I • 1 • 2)=F2( I , 1,2) *RES ( I )*TEMP-F  1( I • 1,2) *TEMP1 
10  CONTINUE 

C  RETURN  IF  ONLY  ONE  LAYER  INVOLVED. 

IF( ( M— 1 ) .NE.O  )  GO  TO  50 
DO  40  K= 1 , 2 
DO  40  L=1 ,2 

IF{  ICONT.EO. 1 )  GO  to  40 
FF ( K,L ) =F2( 1 ,K,L) 

40  F(K.L) =F1 ( 1 ,K,L) 

RETURN 

50  DO  60  K  — 1 , 2 
DO  60  L=1 . 2 
60  FF(K,L)=0.0 

IF( ICONT.EO. 1 )  GO  TO  150 

c  FOLLOWING  IS  THE  ROUTINE  TO  COMBINE  INDIVIDUAL  DERIVATIVES  OF  THE 

C  HEAT  TRANSFER  MATRICES  TO  GET  THE  OVERALL  DERIVATIVE. 

DO  140  1=1, M 
DO  120  J=1,M 
DO  80  K= 1 , 2 
DO  80  L=1 ,2 

IF( ( I  —  J ) .EQ.O)  GO  TO  70 
F3( J,K,L) =F1 ( J,K,L) 

GO  TO  80 

70  F3( J.K.L) =F2( J,K,L) 

80  CONTINUE 

IF( (J— 1 ) .EQ.O)  GO  TO  120 
DO  90  K= 1,2 
DO  90  L=l,2 
90  F(K,L)=0.0 
DO  100  K=l,2 
DO  100  L=1 , 2 
DO  100  N= 1,2 

100  F(K.L)=F(K,L)+F3( J-1.K.N)*F3( J.N.L) 

DO  110  L= 1,2 
DO  110  K= 1,2 
110  F3( J.K.L)xF(K.L) 

120  CONTINUE 

DO  130  K= 1,2 
DO  130  L= 1*2 

130  FF(K,L)*FF(K,L)+F(K.L) 

140  CONTINUE 
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FOLLOWING  IS  THE  ROUTINE  TO  COMBINE  1NOIVIOUAL  HEAT  TRANSFER 
MATRIX  TO  GET  THE  OVERALL  HEAT  TRANSFER  MATRIX. 

150  DO  190  1=2. M 
DO  160  K= 1.2 
DO  160  L= 1.2 
160  F(K.LJ=0.0 

DO  170  K= 1,2 
DO  170  L»l, 2 
DO  170  N= 1,2 

170  F(K. L)=F(K,L)+F 1(1-1, K.N)*F 1(1, N.L) 

DO  180  K=1 «  2 
DO  180  L=1 , 2 
180  F 1 (  I «K«  L ) =F ( K ,L ) 

190  CONTINUE 
RETURN 
ENO 


* 

■ 


■ 


215 


B6.  Subroutine  ORIGIN. 
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SUBROUTINE  OR  I G I N ( RR . BET  A . RES . M , MP, MPP ) 

c 

C  SUBROUTINE  TO  CALCULATE  THE  RESIDUES  AT  THE  POLES  OF  THE 

C  Z-TRANSFER  FUNCTIONS.  (FIRST  AND  SECOND  DERIVATIVES) 

C 

c  nomenclature: 

C  RR  =  TH I CKNESS/THER  MAL  CONDUCTIVITY  ( XL/XK ) . 

C  OR  THERMAL  RESISTANCE  OF  LAYER  WHEN  THERE  IS 

C  NEGLIGIBLE  HEAT  STORAGE. 

C  BETA*BETA=XL*XL*0*SH/XK. 

C  WHERE  0=0E NS  ITY . 

C  SH=SPEC IF IC  HEAT. 

C  RES=RESI STANCE  OF  RADIATION  PATH  WHENEVER  APPLICABLE. 

C 

C  M=NUMBER  OF  LAYER  THE  SLAB  IS  COMPOSED  OF. 

C 

C  MP=CONT A I NS  THE  VALUE  OF  THE  FIRST  DERIVATIVE  AT  THE 

C  POLES  ON  RETURN. 

C  MPP=CONT  A  INS  THE  VALUE  OF  THE  SECOND  DERIVATIVE  AT  THE  POLES 

C  ON  RETURN 

C 

DOUBLE  PRECISION  RP ( 20 ) . B ET A ( 20 ) . RES ( 20 ) . MP ( 2 , 2 ) • MPP { 2 . 2 ) « 

1 A(20,2.2) ,B(20,2,2)  ,C(20,2.2)  ,D(2.2) ,E<  2,2) ,F(2. 2) .G<2.2) . 

2TEMP ( 2 « 2) .TEMP 1( 2  ,2  )  ,P,R 
DO  10  1=1,2 
DO  10  J  =  1  .2 
MP( I, J)=  0.0 
10  MPP (  I  »  J  ) =0 • 0 
DO  40  1=1, M 
P  =  BETA(I  ) *BET  A{ I) 

R=RR ( I ) 

C  ELEMENTS  OF  THE  MATRIX  AT  THE  POLE  FOR  LAYER  I.  FOR  CONDUCTION 

C  OR  NEGLIGIBLE  HEAT  TRANSFER. 

AC  I ,1 ,1 )=1.0 
A( I , 1 «  2 )=R 
A(I ,2,1 )=0.0 
A ( I ,2.2) =1.0 

IF(RES(I 1.EQ.0.0)  GO  TO  20 

C  ELEMENTS  OF  THE  MATRIX  AT  THE  POLE  FOR  LAYER  I,  WHERE  THERE  IS 

C  HEAT  TRANSFER  BY  CONDUCTION  AND  THERMAL  RADIATION. 

A ( I , 1 ,2 )=R*RES( I ) / ( R+RES (  I  ) ) 

C  FIRST  DERIVATIVE  OF  THE  ELEMENTS  OF  THE  MATRIX  AT  THE  POLE 

C  FOR  LAYER  I,  FOR  CONDUCTION  OR  NEGLIGIBLE  HEAT  STORAGE. 

20  B( I . 1 , 1 )=P/2.0 
8(1,1 , 2 ) =R*P/6. 0 
B(I ,2,1) =P/R 
B(I»2,2)  =  P/ 2.0 
IF(RES( I ) .EO.O.O)  GO  TO  30 

C  FIRST  DERIVATIVE  OF  THE  ELEMENTS  OF  THE  MATRIX  AT  THE  POLE 

C  FOR  LAYER  I,  WHERE  THERE  IS  HEAT  TRANSFER  BY  CONDUCTION  AND 

C  THERMAL  RADIATION. 

B(I ,1,1 )  =  RES( I) *P/2.0/(R+REST  I)  ) 

B( I , 1 ,2) =( 1 . 0-R/(R+RES( I ) ) )*RES( I ) *R*P/6. 0/C R+RES ( I ) ) 

B(I.2,1)= (RES ( I ) 4P/R+P ) /( R+RESI I ) ) 

B (  I , 2 • 2 ) =B(  1,1,1) 

C  SECOND  DERIVATIVE  OF  THE  ELEMENTS  OF  THE  MATRIX  AT  THE  POLE  FOR 

C  LAYER  I,  FOR  CONDUCTION  OR  NEGLIGIBLE  HEAT  STORAGE. 

30  C(I,1,1)=P*P/12.0 
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C (  1  *  1 • 2 ) =P*P*R/60 .0 
C( I ,2. 1 )*P*P/3.0/R 
C(I*2,2) =C(  1,1.1) 

40  CONTINUE 

C  RETURN  IF  ONLY  ONE  LAYER  INVOLVED, 

IF( (M-l ) .NE.O )  GO  TO  60 
DO  50  1=1.2 
DO  50  J=1 ,2 
MP (  I,  J)=8< 1 , I. J) 

50  MPP ( I, J)=C( 1 . I, J) 

RETURN 

C  FOLLOWING  IS  THE  ROUTINE  TO  CALCULATE  THE  FIRST  AND  SECOND 

C  DERIVATIVE  OF  THE  HEAT  TRANSFER  MATRIX  AT  THE  POLES  FOR  A 

C  MULTILAYER  SLAB. 

60  DO  280  I = 1 , M 
DO  260  K=1,M 
IF( I.NE.K)  GO  TO  80 
IF( I ,NE. 1 )  GO  TO  70 
D ( 1 , 1 )=B( 1.1,1) 

D(1.2)  =  B(  1.1,2) 

0(2.1 )=B( 1,2.1) 

D(2,2)=B(  1,2,2) 

GO  TO  80 

70  D ( 1  . 1  ) =  A (  1,1,1) 

D(1.2)  =  A(  1,1,2) 

0(2.1 ) = A {  1,2,1) 

D( 2 ,2 ) =A( 1.2.2) 

80  I F (  I ,NE. 1 )  GO  TO  90 
IF(K.NE.l)  GO  TO  100 
EC  1 , 1 )=C(  1,1,1) 

E ( 1 , 2 ) =C (  1,1,2) 

E ( 2  » 1 )=C( 1.2,1) 

EC  2, 2) =C( 1,2,2) 

GO  TO  120 

90  IF(K.NE.l )  GO  TO  110 
100  E(1 . 1 )=B(  1,1,1) 

E(1 ,2)=B( 1.1,2) 

E ( 2 , 1 )  =  B ( 1,2.1 ) 

E(2»2)=B( 1,2,2) 

GO  TO  120 

11 0  E ( 1 • 1 ) = A (  1,1,1) 

E ( 1 , 2 ) =A(  1,1.2) 

E ( 2 ♦ 1 )=A( 1,2,1) 

E ( 2  «  2 ) =A (  1.2,2) 

120  DO  240  J=2.M 

I F ( I.NE.K)  GO  TO  170 
I F ( I.EQ.J )  GO  TO  130 
F( 1 ,1 )=A( J, 1,1) 

F ( 1 ,2) =A( J.l ,2) 

F ( 2 , 1 )=A( J.2.1) 

F(2,2)=A(J,2,2) 

GO  TO  140 

130  F(1 . 1 )=B( J. 1,1) 

Fd  ,2)  =  B(  J,  1,2) 

F(2.1)=B(J,2.1) 

F(2,2)=B( J.2.2) 

140  DO  150  L= 1,2 
DO  150  LL= 1 , 2 
TEMP(L,LL)*0.0 
DO  150  LLL=1 • 2 


■ 


B6. 

1  19 

120 

121 

122 

123 

124 

125 

126 

127 

1  28 

129 

1  30 

131 

1  32 

133 

134 

135 

1  36 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

1  48 

149 

1  50 

151 

152 

153 

154 

1  55 

156 

157 

158 


217 


Continued 


150  TEMP(L*Lt_)  “TEMPI L  »LL  )  +D  (  L  «  LLL  )  *F(  LLL  »LL  ) 

DO  160  L=1.2 
DO  160  LL=1.2 
160  D(L.LL)=TEMP(L.LL) 

170  IF(I.EO.J)  GO  TO  180 
IF(K.EQ.J)  GO  TO  190 
G  (  1  .1  )  =  A ( J • 1  .1  ) 

G( 1 ,2)=A( J. 1 .2) 

G(  2. 1  )=A<  J.2. 1  1 
G(2,2)=A<  J.2,2) 

GO  TO  210 

180  IFIK.EQ.J)  GO  TO  200 
190  G ( 1  *  1 )=B( J.  1 . 1  ) 

G(1»2)=B(J* 1,2) 

G ( 2  » 1 )  =  B( J.2, 1 ) 

G(2.2)=B( J.2.2) 

GO  TO  210 

200  G( 1 , 1 )=C( J.l .1 ) 

G ( 1 ,2)=C( J, 1 ,2) 

G ( 2  » 1 )=C(J,2,1) 

G(2,2)=C( J.2,2) 

210  DO  220  L=l,2 
DO  220  LL=1,2 
TEMPI <L  ,LL)=0. 0 
DO  220  LLL=1,2 

220  TEMPI (L.LL)=TEMP1 (L ,LL) +E( L.LLL ) *G(LLL.LL) 
DO  230  L= 1,2 
DO  230  LL=1,2 
230  E ( L  ,LL) =TEMP1 ( L , LL ) 

240  CONTINUE 

DO  250  L=1 , 2 
DO  250  LL=1,2 

250  MPP(L,LL)=MPP(L.UL)+TEMP1(L.LL) 

260  CONTINUE 

DO  270  L= 1,2 
DO  270  LL=1,2 

270  MP(L,LL)=MP(L,LL)+TEMP{  L.LL) 

280  CONTINUE 
RETURN 
ENO 
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B7 .  Subroutine  FKEQRE . 
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SUBROUTINE  FREQRE  ( RR , B ET A, RES . XL . XK , D. SH, N, W , A . LW) 

c 

C  THIS  SUBROUTINE  CALCULATES  THE  FUNCTIONS  OF  THE  HEAT 

C  TRANSFER  MATRIX  WHEN  S=IW  WHERE  I=SQRT(-1.0) 

c 

c  nomenclature: 

c  RR=THICKNESS/THERMAL  CONDUCTIVITY  (XL/XK) 

C  OR  THERMAL  RESISTANCE  OF  LAYER  WHEN  THERE  IS 

C  NEGLIGIBLE  HEAT  STORAGE. 

C  BETA*BETA=XL*XL*D*SH/XK 

C  WHERE  D=DENS ITY 

C  SH=  SPEC  I F I C  HEAT 

C  RES=RES ISTANCE  OF  RADIATION  PATH  WHENEVER  APPLICABLE. 

c 

c  M=NUMBER  OF  LAYER  THE  SLAB  IS  COMPOSED 

c 

C  W  =  ARR AY  CONTAINING  THE  FREQUENCIES  AT  WHICH  THE  FUNCTIONS 

C  ARE  EVALUATED 

C 

C  A=CONTAINS  THE  VALUES  OF  THE  FUNCTIONS  AT  S=IW  FOR  THE 

C  VARIOUS  FREQUENCIES  ON  RETURN  FROM  THE  SUBROUTINE. 

c 

DOUBLE  PRECISION  RR ( 2 0 )  . B ET A C 20 ) , RES ( 20 ) , XL ( 2 0 ) . XK ( 20 ) , D { 20  I . 
1 SH( 20) . AA.BB.CC.DD. EE ,FF , P. R . ALPH A , PH I . P I , ARG 1 . A RG2 • TEMP . W( 6 ) 
COMPLEX* 1 6  A( 6. 2.2) *MM( 2.2). MMM (2.2) . MMMM (  2.2) 

P I  =  3.  14159265 
DO  60  J= 1 . LW 
DO  10  1  =  1. M 
R=RR<  I) 

IF(W(J) .NE.0.0 .AND .XL(I J.NE.0.0)  GO  TO  5 
MM< 1 . 1) =( 1 . 0D0. 0.000 ) 

ARG2=0 . 0 

MM ( 1.2) =OCMPLX ( R»  ARG2) 

MM{ 2. I ) =<  0. 00  0. 0.000) 

GO  TO  6 

5  P=2.0*PI/W(J) 

ALPHA=XK< I ) /D( I )/SH( I ) 

PH I=DSQRT(PI*XL( I ) *XL( I J/ALPHA/P) 

A  A=  DS I N ( PH I ) 

BB=DCOS(PHI ) 

CC=DEXP(PHI ) 

DD=DEXP(-PHI ) 

EE= ( CC— DD )/2  .0 
FF= ( CC+OD )/2 .0 
ARG 1=FF*BB 
ARG2=EE*AA 

MM( 1. 1 )=OCMPLX( ARG1 . ARG2 ) 

ARG1=RR( I )* (FF*AA+EE*BB) /2.0/PHI 
ARG2=RR( I ) *(FF*AA-EE*BB) /2.0/PHI 
MM{ 1 .2) =DCMPLX( ARG1 . ARG2 ) 

TEMP=2.0*ARG1 *PHI*PHI/RR( I ) /RR ( I ) 

ARG1  =  — ARG2  *2.0*PHI*PHI/RR(  I  )-/RR  C  I) 

ARG  2=TEMP 

MM<  2. 1 ) =DCMPLX ( ARG1 *  ARG2 ) 

6  MM<  2,2) =MM( 1,1) 

IF(RES( I J.EQ.O.O)  GO  TO  7 

MM( 2, 1 ) =<MM<  2. 1  )*RES( I )+2.0*MM< 1 , 1 ) -2 . 0 ) /( MM ( 1 , 2)+RES(  I ) ) 

MM(  1 . 1 ) =<  MM(  1  , 1  )*RES(  I ) +MM( 1,2)  ) / ( MM (1,2) +RES(  I)  ) 
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Continued 


MM ( 1 • 2 ) 3 ( MM ( 1.2)*RES< I) )/(MM( 1,2)+RES(I )) 
MM(2,2|=MM( 1.1 ) 

7  I F( 1 . EQ  •  1  )  GO  TO  20 
DO  30  K=1.2 
DO  30  L=1 *2 
MMMM(K.L)=(0.0.0.0) 

DO  30  N  = 1 . 2 

30  MMMM(K.L) =MMMM( K.L) ♦MM(N.L)*MMM(K,N) 

DO  40  K=l,2 
DO  40  L=1 . 2 
40  MMM(K.L) =  MM  HM(KiL) 

GO  TO  10 
20  DO  50  K=l,2 
DO  50  L=1 .2 
50  MMM(K»L)  =  MM (K.L) 

10  CONTINUE 

DO  70  K=1 , 2 
DO  70  L= 1 . 2 
70  A{ J.K.L) =MMM(  K.L) 

60  CONTINUE 
RETURN 
ENO 
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Subroutine  POLYM. 


SUBROUTINE  POLYMI A. 6  * K. M) 

C 

C  THIS  SUBROUTINE  FINOS  THE  PRODUCT  OF  TWO  POLYNOMIALS  OF  ORDER 

C  N  AND  M  RESPECTIVELY. (N=ORDER  OF  NEW  POLYNOMIAL  A  ON  RETURN). 

c 

DOUBLE  PRECISION  A ( 900 ) . B ( 90 0 ) . C ( 900 ) 

K=N+M 

K=MIN0(K.899) 

KK=K+1 

DO  10  1=1.900 
10  C(I)=0.0 

DO  25  1=1. KK 

KKK=I 

L=N4i 

L=M INO ( I . L ) 

J=  I  -  M 

J=M AXO ( 1 . J) 

DO  20  NN=J.L 
INN=I -NN+1 

20  C(I )=C( I)+A(NN)*B( INN) 

I F ( I .LT.5JG0  TO  25 

IF(DABS(C( I ) ) .LT.O. 10-12)  GO  TO  35 
25  CONTINUE 
35  KK=KKK 

DO  30  1=1.900 
30  A ( I ) =C( I ) 

N=KK  —  1 
RETURN 
END 


. 
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B9.  Subroutine  SOLVN. 
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C 

C 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 
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c 
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c 

c 

c 
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c 

c 
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c 


IDENTIFICATION  -  CLPG  101  SOLVO 
PURPOSE 

MATRIX  INVERSION  AND  SOLUTION  OF  LINEAR  EQUATIONS 
AUTHOR  /  DATE 

NRC  COMPUTATION  CENTRE  /  1968 
SOURCE  LANGUAGE 

IBM  SYSTEM  360  FORTRAN  IV  (DOUBLE  PRECISION) 

REFERENCES 

SEE  NRC  PROGRAMMER'S  MANUAL  -  PROGRAM  LIBRARY  CHAPTER 
CALLING  SEQUENCE 

CALL  SOL VD  ( X , I  X • M , N , PREC , DET . TEST ) 

ON  ENTRY 

X  -  A  TWO  DIMENSION  ARRAY  CONTAINING  THE  MATRIX  AND 
OPTIONALLY  SOME  RIGHT  HAND  SIOES 

IX  -  THE  FIRST  DIMENSION  OF  X 

M  -  THE  NO.  OF  ROWS  IN  THE  MATRIX 

M  .LE.  THE  DIMENSION  OF  II  AND  12 
N  -  THE  NO.  OF  COLUMNS  IN  THE  MATRIX 
N  =.  M  ♦  (NO.  OF  RIGHT  HAND  SIOES) 

PREC  -  A  PARAMETER  USED  TO  TEST  FOR  A  NEARLY  SINGULAR  MATRIX. 

IF  A  PIVOT  .LE.  |PREC|*(MATRIX  NORM)  IT  IS  CONSIDERED 
TO  BE  0  AND  THE  INVERSION  IS  STOPPED.  IF  PREC=0  THEN  IT 
IS  ASSUMED  TO  BE  .50-14 

ON  RETURN 

X  -  THE  INVERSE  MATRIX  HAS  REPLACED  THE  ORIGINAL 

AND  THE  RIGHT  HAND  SIDES  (IF  ANY)  HAVE  BEEN  REPLACEO  BY 
THEIR  CORRESPONDING  SOLUTIONS 
DET  -  THE  DETERMINANT 

TEST  -  =0  IF  INVERSE  AND  SOLUTIONS  ARE  CALCULATED  O.K. 

NE  0  IF  MATRIX  IS  SINGULAR,  IN  WHICH  CASE  NO  INVERSE 
OR  SOLUTIONS  HAVE  BEEN  FOUND.  IN  THIS  CASE 
TEST=|PREC|*( MATRI X  NORM) 

SUBROUTINE  SOLVD  ( X , I X . M, N. PREC . DET . TEST ) 

INTEGER42  11(255),  12(255) 

REAL*8  X{  IX, 2)  . T . DET , B I G, PREC , TEST, P I  V . TEMP , OSQRT , DABS 
EQUIVALENCE  (  BI  G  ,  TEMP  ,P  IV  ) 

INITI AL I Z AT  I ON 

DET  =  1.D0 

TEMP  =  DABS ( PREC ) 

IF  (TEMP  .EQ.  0.D0)  TEMP  =  0.5D-14 
TEST  =  0 . DO 
DO  1  I  =  l.M 
12(1)  =  0 
DO  1  J  =  l.M 

TEST  =  TEST  ♦  X(I,J)  *  X(I,J) 

TEST  =  TEMP  *  DSQRT ( TEST)  /  M 
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Continued 


SEARCH  FOR  NEXT  PIVOT,  AVOIDING  ROWS  AND  COLUMNS  WHICH  ALREAOY 
C  CONTAIN  A  PIVOT. 

c 

DO  9  K  =  1  ,  M 
BIG  =  0 . DO 
00  3  I  =  1 , M 

IF  (12(1)  .NE.  0)  GO  TO  3 
DO  2  J  =  1,M 

IF  (  1 2 ( J )  .NE.  0)  GC  TO  2 
T  =  DABS ( X ( I , J  )  ) 

IF  (T  .LE.  BIG)  GO  TO  2 
BIG  =  T 
I  ROW  =  I 
JCOL  =  J 

2  CONTINUE 

3  CONTINUE 

IF  (BIG  .CE.  TEST)  RETURN 
C 

C  RECORD  POSITION  OF  PIVOT  THEN  MOVE  PIVOTAL  ROW  SO  PIVOT  LIES  ON 

C  THE  DIAGONAL.  SCALE  PIVOTAL  ROW. 

C 

IKK)  =  JCOL 
I  2 ( JCOL )  =  IROW 
IF  (JCOL  .EQ.  IROW)  GO  TO  6 
DO  5  J  =  l.N 
TEMP  =  X(IROW.J) 

X(IROW,J)  =  X( JCOL, J ) 

5  X ( JCOL , J )  =  TEMP 
DET  =  -DET 

6  DET  =  DET  *  X(JCOL.JCOL) 

PIV  =  1 .D0/X( JCOL, JCOL) 

DO  7  J  =  1,N 

IF  (J  .NE.  JCOL)  X ( JCOL , J )  =  PIV  *  X(JCOL,J) 

7  CONTINUE 
X ( JCOL, JCOL )  =  PIV 

ELIMINATE  REMAINING  ROWS. 

DO  9  I  *  1 ,  M 

IF  (I  .EQ.  JCOL)  GO  TO  9 
PIV  =  — X ( I, JCOL) 

DO  8  J  *  l.N 

IF  (J  .NE.  JCOL)  X(I.J)  =  X( I , J )  +  PIV  *  X(JCOL.J) 

8  CONTINUE 

X ( I , JCOL )  =  PIV  *  X ( JCOL, JCOL ) 

9  CONTINUE 

c 

C  UNSCRAMBLE  THE  COLUMNS  OF  THE  INVERSE  ACCORDING  TO  THE  ORIGINAL 

C  POSITIONS  OF  THE  PIVOTS. 

C 

DO  11  K  =  1 , M 
I  =  M+l  -  K 
JCOL  =11(1) 

IROW  =  I  2 ( JCOL ) 

IF  (IROW  .EQ.  JCOL)  GO  TO  11 
DO  10  I  =  1 , M 
TEMP  =  X(I.IROW) 

X( I , I  ROW )  »  X ( I , JCOL ) 

10  X ( I , J  COL )  =  TEMP 

11  CONTINUE 
TEST  =  0.D0 
RETURN 

END 


' 
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BIO.  Subroutine  ATRCAV. 


1  SUBROUTINE  AIRCAV(RESI»  EE1 .EE2.ZZZ) 

2  DOUBLE  PRECISION  S A ( 250 • 1 00 ) • AVH. A1 ( 1 20 ) , A2 ( 1 20 ) . A3( 1 20 ) • AZ( 1 20 ) • 

3  1B1( 120) »  B2  ( 120) *B3(  120) »BZ(  120) »  C  1  <  120) «C2( 120). C3( 120) ,CZ(120) • 

♦  2D1 ( 120) . D2< 120) ,D3( 120) ,DZ( 120) 

5  COMMON  A  1 .A2.A3.AZ.B1 .B2.B3.BZ.C1  »  C2 . C3 «  CZ *  01 *02*  D3 «  DZ  , 

6  1  K XX  »  KXY  *  KXZ  »  KYX  »  A  VH  »  S  A 

7  AVSO=0 

8  AVTE=0 

9  DO  3013  1=7,17 


10 

A VSO=SNGL( AVSO+SA (89,I)+SA( 109,1)) 

1 1 

AVTE=  SN  GL ( AVT  E*S A (20,1)  ) 

12 

301  3 

CONTINUE 

13 

AVSO= AVSO/22 

14 

AVTE=  AVTE/ 1 1 

15 

DT=ABS( AVSO-AVTE) 

16 

ATC=< AVSO+AVTEJ/2 

17 

DTL  3  =  DT  * ( AVH** 3 ) 

18 

3015 

XXX=DLOG10(DT*< AVH* *3)) 

19 

IF  (ZZZ.LT.2.0)  GO  TO  2 

20 

IF( OTL3.GT. 10 )  GO  TO  2019 

21 

AAOs-1.77 

22 

A  A  l  =0 

23 

A  A2=0 

24 

AA3=0 

25 

GO  TO  2020 

26 

2019 

AAO=-l .745 

27 

AA 1 =— 0 . 0028 

28 

AA2=. 0029 

29 

A  A  3= . 0008 

30 

GO  TO  2020 

31 

2 

A  AO  =  - 1 . 5904 

32 

AA  1  =  0. 2824 

33 

AA2=0 .0 

34 

A A3=0 . 0 

35 

2020 

YY Y= A  AO  + ( AA1 *  XXX )♦( A A2  * ( XXX**2 )  )+ ( AA3* ( XXX**3)  ) 

36 

ZZZ=EXP(YYY) 

37 

IF(ZZZ.LT.0.2. AND .ZZZ.GT.0.3)  GO  TO  2021 

38 

HC=  ZZZ* ( ( l+0.00035*( DT— 50 ) J/AVH) 

39 

GO  TO  2022 

40 

2  021 

IFIZZZ.LT. 0.2)  GO  TO  2023 

41 

HC=  ZZZ* ( (  1-.001*( DT-50)  )/AVH) 

42 

GO  TO  2022 

43 

2023 

HC=  ZZZ* ( ( 1  +  . 001 7* (DT-50) ) /AVH) 

44 

2022 

HR= . 0  06  86* (  ( ( ATC+46  0 )/l 00  )**3) 

45 

RES I = 1 / (HC+ ( l/( ( 1/EE1 )♦( 1/EE2)-1 ) )*HR) 

46 

RETURN 

47 

END 

* 

/ 
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Bll.  Subroutine  START. 


1 

SUBROUTINE  ST  ART ( I CO 

2 

1  AMI  , AM2.EW. AW.AR.ER. 

3 

DIMENSION  P0L3 ( 100) . 

4 

220) , AMI (  150  1 .AM2C  150 

5 

3 • QO ( 7 ) 

6 

DOUBLE  PRECISION  SA( 

7 

3B1 ( 120) • B2( 120) ,B3< 1 

8 

4D1 ( 120 ) »  D2( 120 )  ,D3( 1 

9 

COMMON  A1 ,A2. A3.AZ.B 

10 

5KXX.KXY.KXZ.KYX  » AVH •  : 

1 1 

GO  TO  (41,42.43*44) , 

12 

41 

N=KXX-1 

13 

COEF2=COEFI<2) 

14 

GO  TO  55 

1  5 

42 

N=KXY-1 

16 

COEF2=COEFI (3) 

17 

GO  TO  55 

18 

43 

N=KXZ-1 

19 

COEF2=COEFI  (  1  ) 

20 

GO  TO  55 

21 

44 

n=kyx-i 

22 

COEF2=COEFI (2) 

23 

55 

I  COM= ICOM  +  1 

24 

DO  40  1=1.7 

25 

Ql( I ) =0. 

26 

Q2( I ) =0  . 

27 

40 

CONTINUE 

28 

DO  580  M=1 , 7 

29 

S22=0 

30 

S23=0 

31 

SUM  1  =  0 

32 

SUM2=0 

33 

SUM3=0 

34 

SUM4=0 

35 

SUM 5=0 

36 

SUM6=0 

37 

S1=0 

38 

S2=  0 

39 

R 1  =  0 

40 

R2=0 

41 

DO  912  1=1, N 

42 

J=  I  +  1 

43 

PRO 1=TEM 1 ( I )*P0L3( J) 

44 

PR02=TEM2( I )*P0L4(J) 

45 

PR03=TEM  2 ( I ) *P0L5 ( J ) 

46 

PR04=TEM 1 ( I ) 4P0L4 ( J ) 

47 

PR05=Q1 ( I ) 4P0L6 ( J ) 

48 

PR06=Q2( I )*P0L6(J) 

49 

SUM1  =  SUM14-PR01 

50 

SUM2=SUM2+PR02 

51 

SUM3=  SUM 3 ♦PRO 3 

52 

SUM 4=  SUM 4  + PRO 4 

53 

SUM5=SUM5+PR05 

54 

SUM6=SUM64PR06 

55 

912 

CONTINUE 

56 

TEMP2=TEP2 

57 

TEMP  1  =  0 

58 

TEP 1*0 

' 
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Bll  o  Continued 
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916  J*M 

S22=.  1 714E-8*< ( 460+TEMP1 ) **4) 

S23= • 1 7 1 4E— 8* ( (460+SA(IZ-2.Mj )**4) 

GO  TO  ( 833.834 .831 , 832, e37, 835. 836, 833. 834 , 831 ,832) • ICOM 

831  R1=(EW*S22) 

Sl= ( AW*SA(47, J) )+(EW*S23) 

GO  TO  1057 

832  R1=(EW*S22) 

S 1  =  ( AW*  S A ( 67 , J )  ) +( EW4S23 ) 

GO  TO  1057 

833  R1=(EW*S22) 

Sl=( AW*SA(7, J) )+(EW*S23 ) 

GO  TO  1057 

834  R1=(EW*S22) 

SI  =  ( AW*  SA ( 27 . J)  ) +(EW*S23) 

GO  TO  1057 

835  R1=ER*S22 

S 1  =  ( AR*  SA( 107, J) ) +( ER*S23 ) 

GO  TO  1057 

836  R1=ER*S22 

S 1  =  { AR*  SA ( 1 27, J ) ) +( ER*S23 ) 

GO  TO  1057 
e37  R 1  =  ER*S22 

Sl=( AR*SA<87. J) )+(ER*S23) 

1 057  TEMP1=(R1-(C0EF1*SA( 1Z-2.M) )- (P0L4( 1 ) *TEMP2 ) -S 1  +  SUM 1-SUM2-SUM5) / 

1 (-COEFl-POL3( 1 ) 1 

I F ( ABS ( TEMP  1 — TEP 1  ).LE.0.05J  GO  TO  918 
TEP1=TEMP1 

TEMP2= ( R2-( COEF2*AM2( MJ ) -(P0L4{ 1 ) 4TEP1 ) — S2+SUM6+SUM3— SUM4 )/{ -C0EF2 
1 —POLS ( 1 ) ) 

GO  TO  916 

918  QQ2=— SUM3+SUM4— ( POLS ( 1) *T EMP2 ) ♦ ( P0L4 ( 1 ) *TEMP 1 ) -SUM6 
QQ1 =SUMl-SUM2+(POL3( 1 )*TEMP1 )-(P0L4(l ) 4TEMP 2 ) -SUMS 
C8=COEF 1*(SA(IZ— 2.M) —TEMP 1 ) 

C9  =  C0  EF2* (TEMP 2— A M2 ( M  J ) 

S A ( I Z  «  M ) =R1 
SA( 1Z+1 ,M)=S1 
SA( IZ+2.M)=C8 
S  A ( IZ+3.M J=QQ1 
S  A ( I Z  +  4 , M )  =  TEMPI 
SA( IZ+5.M J=TEMP2 
S A ( I Z+6 , M ) =OQ2 
S  A  C  I  Z4-7  ,  M  )  =C9 
S A (  IZ  +  8, M)=AM2(M  J 
TEP2=TEMP2 
TE( 1 ) =TEMP1 
NN=N  —  1 

00  914  1=1, NN 

TE( I+l ) =TEM 1 ( 1 ) 

914  CONTINUE 

DO  921  1=1, N 

TEM 1 ( I ) =0 
921  CONTINUE 

DO  915  1=1, N 
TEM1 ( I ) =TE( I) 

915  CONTINUE 
TF( 1 ) =TEMP2 
DO  819  1=1 ,N 
TF( I+l )*TEM2( I ) 

819  CONTINUE 


* '  :V«‘ 

. 
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BU.  Continued 


119 

DO  822  1*1 »N 

120 

TEM2< I  )=0 

121 

822 

CONTINUE 

122 

DO  23  1=1, N 

1  23 

TEM2 (  I  ) =TF (  I) 

124 

23 

CONTINUE 

125 

Q ( 1 >=001 

126 

QO< 1 )=QQ2 

1  27 

DO  4  1=1, NN 

128 

0(1+11=01(1) 

129 

00 ( 1+ 1 ) =Q2 ( I) 

130 

4 

CONTINUE 

1  31 

DO  6  1=1, N 

1  32 

01 ( I 1 =Q(  I  ) 

133 

02 (  I  J  =QQ (  I ) 

134 

6 

CONTINUE 

135 

580 

CONTINUE 

136 

RETURN 

137 

END 

,  1 1 ;  .  i  t  ‘  n  o 
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B12.  Subroutine  FLUX. 
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21 
22 

23 

24 

25 

26 

27 

28 

29 
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55 

56 

57 

58 


SUBROUTINE  FLUX  (M,  ICO  VP.  I COM , P0L3 , P0L4,  POL5 . POL6 , 

1  AMI .AM2.EW.AW.AR.ER.COEF1  . IZ.COEFI) 

DIMENSION  P0L3 (  10  0)  .P0L4<  100 ) ,POL5( 100) ,P0L6( 100 ) • TEM 1 C 120) »TEM2( 1 

2  20)  .AMI  { 150) .AM 2(  1 50  )  . COE F I ( 3 ) 

DOUBLE  PRECISION  SA( 250.1 00) . AVH, A1 ( 1 20 ) . A2 ( 1 20 ) . A3 ( 1 20 ) . AZ ( 1 20 ) • 
3B1( 120) .B2< 120) .B3( 120).BZ( 120) ,C1( 120) »C2( 120).C3< 1 20 ) .CZ( 1 20) . 
4D1 ( 120) , D2( 120 ) ,D3( 120) ,DZ( 120) 

COMMON  A1 ,A2. A3. AZ.B1 .B2.B3.BZ.C1 .C2.C3.CZ. 01.02.D3.DZ. 

5KXX, KXY .KXZ.KYX. AVH.SA 
GO  TO  (41,42.43.44) . ICOMP 

41  N=KXX-1 
COEF2=COEFI (2) 

GO  TO  55 

42  N=KXY— 1 
C0EF2=C0EFI(3) 

GO  TO  55 

43  N=KXZ— 1 
COEF2=COEFI( 1 ) 

GO  TO  55 

44  N=KYX— 1 
COEF2=COEFI C2) 

55  I COM= I C0M41 
S22  =  0 
S23=0 
SUM  1  =  0 
SUM2=0 
SUM3=0 
SUM4=0 
SUM 5=0 
SUM6=0 
S1  =  0 
S2=0 
R  1  =  0 
R2=  0 

DO  912  1=1. N 
J=I  +  1 

PRO  1  =  SA (  IZ4-4.M-I  )*P0L3(  J) 

PR02=SA(  I Z+  5 • M— I ) *P0L4( J ) 

PR03=SA(  IZ  +  5.M-I ) *P0L5( J) 

PR04  =  S  A (  IZ  +  4.M-I )*P0L4( J) 

PR05=SA( I Z+3 , M— I ) *P0L6( J ) 

PR06=S A ( IZ+6.M-I )*P0L6( J) 

SUM1 =SUM 1 +PRO 1 
SUM 2= SUM 2+ PRO 2 
SUM3=SUM3+PR03 
SUM4=SUM4+PR04 
SUM5  =  SUM  5+PR05 
SUM6=SUM6+PR06 
912  CONTINUE 

TEMP2=S A ( IZ45.M-1 ) 

TEMP1=SA(  IZ  +  4.M— 1  ) 

TEP 1  =  TEMP 1 
916  J=M 

S22=. 171 4E— 8* ( ( 460+TEMP1 ) **4 ) 

S23=. 17 1 4E—  8* ( ( 460+SA( IZ-2.M) )**4) 

GO  TO  (833.834,831.832. e37. 835. 836. 833, 834, 821. 832). ICOM 
831  R 1= ( E W*  S22) 

S  1=  (  AW*SA(  47*  J )  )  •MEW4S23) 


41  V«C  .Si.  *  3  *. 


' 


•  IS9 


228 


B12 .  Continued 


59 

GO  TO  1057 

60 

832 

R1=(EW*S22) 

61 

Sl=< AW*SA(67. J)  ) ♦( EW*S2  3 ) 

62 

GO  TO  1057 

63 

833 

R1=(EW*S22) 

6* 

SI  =  ( AW* S A ( 7  »  J ) 1+<EW*S23) 

65 

GO  TO  1057 

66 

834 

Rl= (EW4S22) 

67 

Sl=< AW*SA(27. J) )+(EW*S23) 

68 

GO  TO  1057 

69 

835 

R1=ER*S22 

70 

Sl=( AR*SA( 107, J) ) ♦( ER*S23 ) 

71 

GO  TO  1057 

72 

836 

R1=ER*S22 

73 

Sl=( AR*SA( 127, J) )+CER*S23) 

7* 

GO  TO  1057 

75 

837 

R1=ER*S22 

76 

Sl=( AR*SA<87, Jl )+(ER*S23) 

77 

1  057 

TEMP1= (R1-(C0EF1*SA( IZ-2,M) } 

78 

1 

<-COEFl-POL3(l) ) 

79 

1F( ABS(TEMP 1— TEP 1 J.LE.0.05)  i 

80 

TEP1=TEMP1 

81 

TEMP2=  C  R  2  — { COEF  2*  AM2 ( M)  )-(PO 

82 

1 

—POLS (1)1 

83 

GO  TO  916 

8* 

918 

Q2=  —  SUM  3  + SUM 4  —  ( POLS { l J4TEMP2 

85 

01=SUM1 —SUM 2+ (P0L3< 1 )*TEMP1 ) 

86 

C8=C0EF 1  * { S A ( I Z— 2  ,  M  J  — TE  MP1 ) 

87 

C9=COEF2*  C  TEMP2— AM2 ( M ) } 

88 

SA( IZ.M )=R1 

89 

SA( IZ+1 ,M)=S1 

90 

SA( IZ+2.M)=C8 

91 

S A ( IZ+3,M)=Q1 

92 

S A ( IZ+4,M)=TEMP1 

93 

SA( IZ+5,M)=TEMP2 

94 

SAt I Z+6 , M ) =Q2 

95 

SA( 1Z+7,M)=C9 

96 

S  A (  IZ+8»M)  =  AM2(M) 

97 

RETURN 

98 

END 

GO  TO  918 


gTOo: 
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B13.  Subroutine  HPROD. 
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SUBROUTINE  HPROD ( HOGWT. HOGS , MGMT, M, AM2. O. G, MGMTS  J 
DIMENSION  AM2(150),H0GWT(  10 ) , HOGS ( 1 0 ) , O (  1  2 0 )  .  G(  1  20  ) 

REAL  MOIST. MOIS.LH, MGMT, MGMTS 
TSH=0. 

TMO  I  s=o . 

20  DO  4  1=1,10 

IF(HOGWT( I) .EQ.O.OjGO  TO  10 

TH= 10. **(2.47 7+0. 034*ALCG10(HOGWT(I ) ) -0 . 0 0577* AM 2 ( M ) +0 . 1 4 8* (  ALOGIO 
1  ( HOGWT (  I)  ) ) **2  +  0.000071 *AM2{ M )**  2-0 .00313*AM2(M)*ALOG10( HOGWT( I ) ) ) 
MOIST= 10. **(-0.96 1+0. 0029 l*HOGWT( I >-0.00785* AM2 ( M ) -0 . 0 0 00 146 *AM2(M 
1 ) *HOGWT(  I ) — 0 . 00  0  0  029* HOGWT (  I ) ** 2+ 0. 0 0 0 1 375* AM2 ( M ) **2) *MGMT 
30  LH= 1 0  40 . *  MO I ST 
SH= (TH-LH) *MGMTS 
MO I S=MO I  ST *HOGS ( I ) 

SHE=SH*HOGS( I ) 

TSH=TSH+SHE 
4  TMOIS=TMOI S+MO I S 
10  Q(M)=TSH 
G ( M ) =TMO I S 
40  RETURN 
END 


. 
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B14.  Subroutine  WALL. 
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SUBROUTINE  WALL ( M ,UA . AMI .AM2.SC.  AEW  A, ATW A . A SWA . AWWA . AEOO . ATOO • 

1  ASDO * AWDO«  AEW  I»  ATW I  * ASW I .  AFLO. ARO 1 «  AR02 . AR03 • W AL .DOR .FLO. ROOF.ROF# 
2WIN.QSUM) 

DIMENSION  AMI ( 150) »AM2(  150) »  W AL (120). DOR (120)*FLO(120). ROOF ( 120 ) t 
3R0F ( 1 20 ) . WIN< 120 )  ,OSUM(  1 20  )  , SS (  1 20 ) . S W { 1 2 0 )  . SE( 1 20 ) . SN<  1 2 0 ) 

DOUBLE  PRECISION  SA<  2  50.1  00)  . AVH »  A 1 ( 1 20 )  . A2 ( 1 20 )  . A3 ( 1 20 ) . AZ ( 1 20 ) . 
4B1( 120) .B2( 120) ,83< 120) ,BZ( 120).C1( 120) ,C2( 120) .C3( 120) •CZ(120) . 
5D1 ( 120) ,02{ 120) ,D3( 120) .DZI 1 20) 

COMMON  A1.A2.A3.AZ.B1.B2.B3.BZ.C1.C2.C3.CZ.DI.D2.D3.DZ. 

6KXX .KXY , KXZ.KYX. AVH • S A 
N=M 
I=M 

UAV=UA*( AMI (  I  )  —  AM 2 ( I  )  ) 

SS<  M) =( ( SC* S  A ( 8 . N  )  ) +UAV )*ASWI 
SW(M) =( ( SC*S A ( 28 . N ) )*UAV) *AWWI 
SE ( M )  =  (  ( SC*  SAI48.N)  ) +UA V ) *AEW I 
SN( M) =( ( SC*SA( 68. N) J+UAV) *ATWI 
WIN(M)=SE(M)+SW( M)+SN(M)+SS(M) 

W  AL (M)  =  (SA(58,M)*(AEW  A—  AE  DO— AEW I ) ) ♦ ( S A< 78 , M ) * ( ATWA- ATDO- ATWI )  )*{SA 
1  ( 1 8, M) * ( ASW A- ASDO -AS* I )  )♦( SA( 38. M ) * ( A WWA- AWDO-AW W I ) ) 

DOR (M)=(SA(  198. M) *AEDO ) *( SA ( 2 18  *  M ) *ATDO ) ♦( SA ( 178 . M ) * A WDO ) ♦ ( S A ( 1 58. 
1 M)*ASDO) 

ROF(M)=(SA( 1 18,M)*AR01)+<SA(98,M)*AR02) 

ROOF ( M ) =  AR03*S A ( 1 38, M ) 

FLO<  M) =AFLO*0.38*( AMI (M)- AM2( M) ) 

QSUM { M )  =  W AL (M)+DOR( M  ) +FLO ( M ) +RCF ( M ) +ROO F ( M ) +WIN( M) 

RETURN 

END 


/ 
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B15.  Subroutine  VENTIL. 
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SUBROUTINE  VENTIL( M.AM2 .AMI ,T%1 .B.QSUM. 

1  SENS. WM.RH.C4.C5.RH1 .SUP. SUMO.RH2) 

EXTERNAL  PICE.PH20 

DIMENSION  AM2  (150)  «AM1(  150).TV*1  (150)  . 

2QSUM (  120 )  »  SENS (  120) .  WM(  120). C4 (120) .C5(  120) . 

3RH1 ( 120 ) .SUP( 120 ) ,SUMQ( 120 ) . RH2 ( 120) .B( 150) 

HG2= 1061 ,+0.444*A  M2 ( M ) 

HG3=1061 . +0.444*AM1(M) 

IF  (TW1 (M) .GT.32. )  GO  TO  949 
CALL  PICE(M.TW1,PW1 ) 

GO  TO  951 

949  CALL  PH 20 (M.TW1.PW1) 

951  IF  (AM2(M).GT.32. )  GO  TO  222 
CALL  PICE(M,AM2.PW2 ) 

GO  TO  223 

222  CALL  PH 20 (M.AM2.PW2) 

223  IF  ( AMI (M) .GT.32. )  GO  TO  101 
CALL  PICE(M,AM1 ,PW3) 

GO  TO  888 

101  CALL  PH  20 (M.AM1 ,PW3) 

888  E  1=PW 1  —  ( ( B(M)-PW1  )* ( AMI ( M ) — TW1 { M ) )/( 280  0-1.34TW1  (  M) ) ) 
W1=4354*E1/(B(M)-E1 ) 

Vl= ( ( ( . 754* (AMI ( M ) +459. 7) )/B( M) ) * ( 1 ♦ ( W1 /4360 ) ) ) 

W 1  =  W 1 /7  000.0 

Hl=( .24* A Ml ( M) ) +( W1 *HG3) 

SUMQ( M) =QSUM( M) +SENS( M) 

H2=( ,24*AM2(M) )+(Wl*HG2) 

WS=( . 622*PW2) /( B ( M ) —  PW2 ) 

U=(  ( RH*B ( M )  ) — ( RH*PW  2 )  )/((  100.0*B(M)  )-(RH*PW2) ) 

W2=U*WS 

C4(M)=( WM(M )*V1 )/(60*( W2-W1 ) ) 

C5(M)=( SUMQ (M)*Vl)/(60*( H2— HI ) ) 

W4= ( ( WM ( M}*V1 )/( 60.0*C5( M) ) ) 4W1 
IF(C5(M  )  .LE.O  )  W4=WS 
IF( C5(M) .LE.O  )  C5(M)  =  0 
U=W4/WS 

IF(U.LE.l.O)  GO  TO  843 
U=1 .0 

843  RH1  (M)  =  ( 100.0*U)/( l-(  ( 1  — U ) * ( PW2/B ( M)  )  )) 

WSS=( ,622*PW3)/(B(M)-PW3) 

u=wi/v*ss 

IF(U.LE.l.O)  GO  TO  844 
U=1.0 

844  RH2 ( M)  =  ( 100. 0*U ) /{ 1 - ( ( 1  — U ) * ( PW3/B ( M ) ) ) ) 

SUP ( M )=( ( 60 ,0*C4(M) *(H2-H1  ) )/Vl )-SUMQ(M) 

RETURN 

ENO 
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Subroutine  PICE. 


SUBROUTINE  PICE(I.T.PP) 

DIMENSION  T ( 1 50  J 
C=(T(I)-32.)*(5./9.) 

A=C+273. 16 
TT=273. 16/A 

P=10.**(-9. 096936*( TT-1 . ) -3. 56654* ALOG1 0 (TT) +0. 8 768 17* < 1 .-( 1 ,/TT) 1 
1-2.219598) 
pp=p*29. 92.1 
RETURN 
ENO 


, 

. 


1 
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B17 .  Subroutine  PH20 . 
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SUBROUTINE  PH20(I«T,PP) 
DIMENSION  T( 1 50  ) 

C=(T{ I ) -32. ) * ( 5  ,/9. ) 
A=C+273. 16 


TT=273. 16/A 
P=10.**( 1 0.79566*  (  1 
1 (-8.29692*1 ( 1. /TT)- 
2-2.219598) 


•-TT  )+S.0280  8*ALOG10(TT)  +  1.50  474E-4*<  1 .-10** 
1 . ) ) )♦ 0.42873E-3* ( 1 0 •*  * ( 4.76955* (  1 .-TT ) I  —  1 . ) 


PP=P*29 .921 


RETURN 

END 
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APPENDIX  C:  PROGRAM  VARIABLE  NAMES  AND  UNITS 
Cl.  MAIN  Variable  Names  and  Units. 


AEDO  = 

2 

area  of  east  doors,  ft  , 

AEWA  = 

2 

area  of  east  walls,  ft  , 

AEWI  = 

2 

area  of  east  windows,  ft  , 

AFLO  = 

perimeter  of  floor,  ft. 

AMI  = 

outside  dry-bulb  temperature,  °F, 

AM2  = 

inside  dry-bulb  temperature,  °F, 

AN 

number  of  animals  confined. 

AR 

absorptivity  factor  for  outside  roof  surface. 

AROl  = 

2 

area  of  roof  slope  #1,  ft  , 

AR02  = 

2 

area  of  roof  slope  #2,  ft  , 

AR03  = 

2 

area  of  horizontal  roof,  ft  , 

AS  DO  = 

2 

area  of  south  doors,  ft  , 

ASWA  = 

2 

area  of  south  walls,  ft  , 

ASWI  = 

2 

area  of  south  windows,  ft  , 

ATDO  = 

2 

area  of  north  doors,  ft  , 

ATTD  = 

attic  dry -bulb  temperature,  °F, 

ATTW  = 

attic  wet -bulb  temperature,  °F, 

ATWA  = 

2 

area  of  north  walls,  ft  , 

ATWI  = 

2 

area  of  north  windows,  ft  , 

AVH  = 

average  thickness  of  the  air  cavity,  in. 

AW 

absorptivity  factor  for  outside  wall  surface. 

AW  DO  = 

2 

area  of  west  doors,  ft  , 

AWWA  = 

2 

area  of  west  walls,  ft  , 

AWWI  = 

2 

area  of  west  windows,  ft  , 

t-33£^'1U2  VlCH  >€l  >6*  \3  Mj<T»02C6 


‘ 

« ywJ&isqpfl^  d  jc-^ew  oriJe 


235 


Al 

= 

z-transfer 

functi  on 

coeffi  cient , 

A, 

for  wal  1 , 

A2 

= 

z-transfer 

function 

coeffi  cient , 

B, 

for  wall , 

A3 

- 

z-transfer 

functi  on 

coeffi  cient, 

c, 

for  wal  1  , 

AZ 

= 

z-transfer 

function 

coeffi  cient , 

D, 

for  wal 1 , 

B 

- 

barometri  c 

pressure 

,  in  Hg, 

B1 

= 

z-transfer 

functi  on 

coeffi  cient. 

A, 

for  pitched 

roof, 

B2 

= 

z-transfer 

function 

coeffi  cient. 

B, 

for  pitched 

roof, 

B3 

= 

z-transfer 

fun  cti  on 

coeffi  cient. 

c, 

for  pitched 

roof, 

BZ 

= 

z-transfer 

functi  on 

coefficient. 

D, 

for  pitched 

roof. 

LO' 

CA 

►= 

locati  on , 

TX 

CCC  =  tri al-  and-error  method  indicator, 

CHANGE  =  increment  of  change  for  inside  dry  bulb  temperature,  °F, 

2  o 

C0EF1  =  outside  film  conductance,  BTU/(ft  )(hr)(  F), 

COEFI  =  inside  film  conductance,  BTU/(ft2) (hr) (°F) , 

Cl  =  z-transfer  function  coefficient,  A,  for  horizontal  roof, 

C2  =  z-transfer  function  coefficient,  B,  for  horizontal  roof, 

C3  =  z-transfer  function  coefficient,  C,  for  horizontal  roof, 

CZ  =  z-transfer  function  coefficient,  D,  for  horizontal  roof, 

C4  =  ventilation  rate  required  to  remove  moisture,  cfm, 

C5  =  ventilation  rate  required  to  remove  resultant  heat  load, 


cfm, 

DAY  I  =  day  of  month, 

DECL  J 

=  declination,  degrees, 

DECLIN 

DIFF2  =  error  in  ventilation  rate  calculation,  cfm, 


'  •  ,  *  f  no  -Sort.  ■ 
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DOR  = 

DST  = 

D1 

D2 

D3 

DZ 

EE1  = 
EE2  = 
ER 

ERROR  = 


EQTIME 

EW 

FLO  = 
G 

HEATR  = 
HOGWT  = 
HOGS  = 
I ATTIC 
I  COM  = 
I  COMP  = 
IZ 

KXX  = 
KXY  = 
KXZ  = 
KYX  = 
MGMT  = 


total  heat  flow  through  doors,  BTU/hr, 
daylight  saving  time, 

z-transfer  function  coefficient.  A,  for  door, 
z-transfer  function  coefficient,  B,  for  door, 
z-transfer  function  coefficient,  C,  for  door, 
z-transfer  function  coefficient,  D,  for  door, 
emissivity  factor  for  upper  surface  of  attic  space, 
emissivity  factor  for  lower  surface  of  attic  space, 
emissivity  factor  for  outside  roof  surface, 
accuracy  desired  for  ventilation  rate  calculation, 

equation  of  time,  min, 

emissivity  factor  for  outside  wall  surface, 
total  heat  flow  through  floor,  BTU/hr, 
moisture  production  of  the  confined  animals,  lb 
moisture /hr, 
heat  load,  BTU/hr, 

average  hog  weight  of  a  group  of  hogs,  lb, 
number  of  hogs  of  a  given  weight, 

=  ingoing  temperature  indicator, 
surface  orientation  counter, 
surface  indicator, 
counter  for  printing  output, 

number  of  z-transfer  function  coefficients  for  wall, 
number  of  z-transfer  function  coefficients  for  pitched  roof, 
number  of  z-transfer  function  coefficients  for  horizontal  roof, 
nuntoer  of  z-transfer  function  coefficients  for  door, 
management  factor  for  moisture  production. 


■ 
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MGMTS  = 
OUT  = 
PERC  = 
PLAT  = 
PLONG  = 
P0L3  = 
P0L4  = 
POL5  = 
POL6  = 

Q 

QSUM  = 
RH 

RH1  = 

RH2  = 
RMONTH  = 
ROF  = 
ROOF  = 
SA 
SB 
SC 

SENS  = 
SUMQ  = 
SUP  = 

TEM1  = 


management  for  sensible  heat  production, 

error  in  ventilation  rate  calculation,  cfm, 

error  in  ventilation  rate  calculation,  %, 

latitude  of  location,  degrees, 

longitude  of  location,  degrees, 

z-transfer  function  coefficient,  A, 

z-transfer  function  coefficient,  B, 

z-transfer  function  coefficient,  C, 

z-transfer  function  coefficient,  D, 

sensible  heat  production  of  confined  animals,  BTU/hr, 

total  heat  flow  through  all  structural  components,  BTU/hr 

relative  humidity  for  ventilation  rate  required  to  remove 

moisture , 

relative  humidity  for  ventilation  rate  required  to  remove 
resultant  heat  load, 
outside  relative  humidity, 
month , 

total  heat  flow  through  pitched  roof,  BTU/hr, 
total  heat  flow  through  horizontal  roof,  BTU/hr, 
program  output  parameters, 
row  names  for  program  output  parameters, 
shading  coefficient, 

total  sensible  heat  production  within  the  building,  BTU/h 

resultant  heat  load  in  the  building,  BTU/hr, 

heat  load  necessary  to  ensure  a  ventilation  rate  required 

remove  moisture,  BTU/hr, 

outside  surface  temperature,  °F, 
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TEM2  = 

inside  surface  temperature,  °F, 

TNT  = 

simulation  time,  days, 

TTT  = 

decreasing  temperature  indicator  for  tri al -and-error 

method. 

TW1 

outside  wet-bulb  temperature,  °F, 

TZN  = 

time  zone  nurrber, 

UA 

heat  transfer  coefficient  for  windows  installed,  BTU/ 

(ft2) 

(hr)(°F). 

UUU  = 

increasing  temperature  indicator  for  tri  al- and-error 

method. 

VENT  = 

ventilation  rate  within  the  building,  cfm. 

WAL  = 

total  heat  flow  through  walls,  BTU/hr, 

WALLA  = 

wall  azimuth,  degrees. 

WALLT  = 

wall  tilt,  degrees. 

WIN  = 

total  heat  flow  through  windows,  BTU/hr, 

WM 

moisture  production  within  the  confinement  unit,  lb 

moisture /hr, 

YEAR  = 

year. 

X 

mon  th , 

Z 

year. 

■ 
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C2.  SOLAR  Variable  Names  and  Units. 

p 

AA  =  apparent  solar  constant,  BTU/(hr)(ft  ), 

ADIN  =  absorption  factor  of  diffuse  radiation  through  inner 
window  pane, 

ADOUT  =  absorption  factor  of  diffuse  radiation  through  outer 
window  pane, 

AIN  =  polynomial  coefficient  for  use  in  calculation  of  absorption 
factor  of  inner  window  pane, 

ALPHA  =  directional  cosine  of  normal  to  surface,  vertical  reference 
axis, 

AOIN  =  absorption  factor  of  direct  radiation  through  inner 
window  pane, 

AOOUT  =  absorption  factor  of  direct  radiation  through  outer 
window  pane, 

AOUT  =  polynomial  coefficient  for  use  in  calculation  of  absorption 

factor  of  outer  window  pane, 

ARO  =  parameter  a/ho, 

where  a  =  absorptance  of  the  surface  for  solar 
radiation,  and 

ho  =  coefficient  of  heat  transfer  by  radiation 
and  convection  at  the  outer  surface, 
BTU/(hr)(ft2)(°F), 

B  =  atmospheric  extinction  coefficient, 

BETA  =  directional  cosine  of  normal  to  surface,  reference  axis 
horizontal  to  west, 

BLAT  =  latitude,  radians, 

C  =  sky  diffuse  factor. 
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L0 


CA 


>  = 


>  = 


TX 
CCM 
CN 

COS  INC 
COSSS 
COSW 
COSZ 
CT 
D 

DAY  = 
DEC  = 
DECL  | 
DECLINJ 
DD 


DDD 


locati  on , 

cloud  cover  modifier, 

clearness  number, 

cosine  of  the  angle  of  incidence, 

directional  cosines  of  direct  solar  beam, 

cloud  type, 
day  of  year, 
day  of  year, 

declination  angle,  radians, 
declination  angle,  degrees, 

solar  heat  gain  factor  for  direct  solar  radiation, 
BTU/(hr) (ft2) , 

solar  heat  gain  factor  for  diffuse  solar  radiation, 

BTU/(hr)(ft2), 

daylight  saving  time, 

surface  indication. 


equation  of  time ,  hr, 

directional  cosine  of  normal  to  surface,  reference  axis 
horizontal  to  south, 


. 
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GRD  = 

HA 

HAD  = 
HHSUN  = 
HO 

HSUN  = 
ICNT  = 
ISTOP  = 
Nil  = 

NIO  = 

OT 

OW 

PLAT  = 
PLONG  = 

R 

R MONTH  = 
SA 

SALT  = 
SKY  = 

SRT  = 
SST  = 
ST 


intensity  of  ground  diffuse  radiation  incident  on  surface, 
BTU/(hr)(ft2), 

I 

absolute  value  of  hour  angle,  radians, 
hour  angle,  degrees, 

hour  angle  for  sunrise  and  sunset,  radians, 

coefficient  of  heat  transfer  by  radiation  and  convection  at 

the  outer  surface,  BTU/(hr)(ft^)(°F) , 

hour  angle  for  sunrise  and  sunset,  degrees, 

day  counter, 

surface  counter, 

inward  flowing  fraction  of  the  radiation  absorbed  by  the 
inner  window  pane, 

inward  flowing  fraction  of  the  radiation  absorbed  by  the 

outer  window  pane, 

outside  dry-bulb  temperature,  °F, 

outside  wet-bulb  temperature,  °F, 

latitude  of  location, degrees , 

longitude  of  locati on, degrees , 

ground  reflectivity, 

month, 

matrix  containing  the  solar  output, 
solar  altitude,  radians, 

intensity  of  ground  diffuse  radiation  incident  on  surface, 

BTU/(hr) (ft2) , 

sunrise  time,  hr, 

sunset  time,  hr, 

solar  output  parameters, 
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T  =  polynomial  coefficient  for  use  in  calculation  of 

transmission  factor  of  window, 

TC  =  total  cloud  cover, 

TD  =  transmission  factor  of  diffuse  radiation  for  window, 
TNT  =  simulation  time  period, 

TO  =  transmission  factor  of  direct  radiation  for  window, 
TZN  =  time  zone. 


u 

month , 

WA 

surface 

azimuth,  radians 

WALLA  = 

surface 

azimith,  degrees 

WALLT  = 

surface 

tilt,  degrees, 

WT 

surface 

tilt,  radians, 

X  =  day  of  month,  and 

Y  =  ratio  of  sky  diffuse  on  vertical  surface  to  sky  diffuse 
horizontal  surface,  and 


Year 


year. 


n\  93U  -tcrt  Jfittameoa  rfirmon^roq 

. 


243 


C3.  AIRCAV  Variable  Names  and  Units. 


AAO 

AA1 

AA2 

AA3 

AA4 

ATC 

AVH 

AVSO 

DT 

EE1 

EE2 

RESI 

DTL3 

HC 

HR 

XXX 

YYY 

ZZZ 


values  for  calculation  of  the  resistance  across  the  air 
space. 


average  temperature  of  the  air  cavity,  °F, 
thickness  of  the  air  space,  inches, 
average  sol -air  temperature  for  the  roof  surface,  °F, 
temperature  difference  across  the  air  space,  °F, 


emissivity  factors  for  the  surface  facing  the  air  cavity, 


air  cavity  thermal 


resistance,  °F  per  BTU/(hr) (ft2) , 


DTL3 


X 

Y 

Z 


y  intermediate  variables  as  presented  in  the  flow 


chart. 
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C4.  START  and  FLUX  Variable  Names  and  Units. 


AM2  = 

inside  dry-bulb  temperature,  °F, 

COEFI(l) 

=  inside  film  conductance  for  horizontal  roof, 
BTU/(ft2)(hr)(°F), 

COEFI (2) 

=  inside  film  conductance  for  walls  and  doors, 

BTU/( ft2) (hr) (°F) , 

COE  FI (3) 

=  inside  film  conductance  for  pitched  roof, 

BTU/(ft2)(hr)(°F), 

COEFI  = 

outside  film  conductance,  BTU/(ft2)(hr)(°F) , 

C0EF2  = 

inside  film  conductance,  BTU/(ft2) (hr) (°F) , 

C8 

p 

convection  at  outside  surface,  BTU/( ft  ) (hr) , 

C9 

p 

convection  at  inside  surface,  BTU/( ft ) (hr) , 

I  COM  = 

surface  orientation  counter, 

I  COMP  = 

surface  indicator. 

KXX  = 

number  of  z-transfer  function  coefficients  for  wall. 

KXY  = 

number  of  z-transfer  function  coefficients  for  pitched  roof, 

KXZ  = 

nunfcer  of  z-transfer  function  coefficients  for  horizontal 

roof, 

KYX  = 

number  of  z-transfer  function  coefficients  for  door, 

M 

time,  hr, 

P0L3  = 

z-transfer  function  coefficient.  A, 

P0L4  = 

z-transfer  function  coefficient,  B, 

POL5  = 

z-transfer  function  coefficient,  C, 

P0L6  = 

z-transfer  function  coefficient,  D, 

fv.  '  •'  ■ 
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PR01 

PR02 

PR03 

PR04 

PR05 

PR06 

Q1 

Q2 

QQ1 

QQ2 

R1 

R2 

SA 

SUM1 

SUM2 

SUM3 

SUM4 

SUM5 

SUM6 

51 

52 


=  intermediate  variables  for  calculation  of  heat  flux  and 
surface  temperatures  (iterative  precedure). 


i. 


>= 


heat  flux  history,  BTU/(ft^) (hr) , 


outside  surface  heat  flux,  BTU/(ft  )(hr), 
inside  surface  heat  flux,  BTU/( ft2) (hr) , 

2 

longwave  radiation  at  outside  surface,  BTU/(ft  ) (hr) , 

2 

longwave  radiation  at  inside  surface,  BTU/( ft  )(hr), 
program  output  parameters, 


intermediate  variables  for  calculation  of  heat  flux  and 
surface  temperature  (iterative  procedure), 


radiation  absorbed  by  the  outside  surface  (short  wave), 
BTU/(ft2)(hr), 

radiation  absorbed  by  the  inside  surface  (short  wave), 
BTU/(ft2)(hr), 


S22  1 
S33  [ 

TEMPI  = 
TEMP 2  = 


intermediate  variables  for  determination  of  radiation 
at  each  surface, 

outside  surface  temperature,  °F, 
inside  surface  temperature,  °F, 
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TEM1 

TEM2 

TEP1 

TEP2 

FF 


variables  to  establish  temperature  history,  F, 


■ 


■ 


C5.  HPROD  Variable  Names  and  Units. 


AM2  =  inside  dry-bulb  temperature,  °F, 

G  =  total  moisture  production  of  all  confined  hogs,  Ib/hr, 

HOGS  =  number  of  hogs  in  a  group, 

HOGWT  =  average  hog  weight  of  a  group  of  hogs,  lb, 

LH  =  latent  heat  production  per  hog  of  a  certain  weight, 

BTU/(hog  )(hr), 

M  =  time,  hr, 

MGMT  =  management  factor  for  moisture  production, 

MGMTS  =  management  factor  for  sensible  heat  production, 

MOIS  =  moisture  production  of  all  hogs  of  a  certain  weight, 

lb  moisture/hr, 

MOIST  =  moisture  production  per  hog  of  a  certain  weight, 
lb/(hog) (hr) , 

Q  =  total  sensible  heat  production  of  all  confined  hogs,  BTU/h 

SH  =  sensible  heat  production  per  hog  of  a  certain  weight, 

BTU/(hog) (hr) , 

SHE  =  sensible  heat  production  of  all  hogs  of  a  certain  weight, 
BTU/h r, 

TMOIS  =  total  moisture  production  of  all  confined  hogs,  Ib/hr, 

TSH  =  total  sensible  heat  production  of  all  confined  hogs, 

BTU/h r. 


. 
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C6 . 

WALL 

Variable  Names  and  Units. 

AEDO 

- 

2 

area  of  east  doors,  ft  , 

AEWA 

= 

2 

area  of  east  walls,  ft  , 

AEWI 

= 

2 

area  of  east  windows,  ft  , 

AFLO 

- 

perimeter  of  floor,  ft, 

AMI 

- 

outside  dry-bulb  temperature,  °F, 

AM2 

= 

inside  dry-bulb  temperature,  °F, 

AROl 

= 

2 

area  of  east  roof  slope  ,  ft  , 

AR02 

s 

2 

area  of  west  roof  slope  ,  ft  , 

AR03 

= 

2 

area  of  horizontal  roof,  ft  , 

ASDO 

= 

2 

area  of  south  doors,  ft  , 

ASWA 

= 

2 

area  of  south  walls,  ft  , 

ASWI 

= 

2 

area  of  south  windows,  ft  , 

AIDO 

= 

2 

area  of  north  doors,  ft  , 

ATWA 

3 

2 

area  of  north  walls,  ft  , 

ATWI 

= 

2 

area  of  north  windows,  ft  , 

AW  DO 

= 

2 

area  of  west  doors,  ft  , 

AWWA 

= 

2 

area  of  west  walls,  ft  , 

AWWI 

- 

2 

area  of  west  windows,  ft  , 

DOR 

= 

heat  flow  through  doors,  BTU/hr, 

FLO 

= 

heat  flow  through  floor,  BTU/hr, 

QSUM 

= 

total  heat  flow  through  structural 

components 

ROF 

= 

heat  flow  through  pitched  roof,  BTU/hr 

ROOF 

= 

heat  flow  through  horizontal  roof. 

BTU/hr, 

SA 

= 

program  output  matrix. 

SC 

= 

shading  coefficient  for  glass. 

SE 

= 

heat  flow  through  east  windows,  BTU/hr, 

• 
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SN  =  heat  flow  through  north  windows,  BTU/hr, 

SS  =  heat  flow  through  south  windows,  BTU/hr, 

SW  =  heat  flow  through  west  windows,  BTU/hr, 

UA  =  heat  transfer  coefficient  for  glass,  BTU/(hr)(ft^)(°F) , 

UAV  =  instantaneous  rate  of  heat  conduction  through  windows, 
BTU/(hr)(ft2), 

WAL  =  heat  flow  through  walls,  BTU/hr, 

WIN  =  heat  flow  through  windows,  BTU/hr, 


/ 
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C7.  VENTIL  Variable  Names  and  Units. 

AMI  =  incoming  dry-bulb  temperature,  °F, 

AM2  =  inside  dry-bulb  temperature,  °F, 

B  =  barometric  pressure,  in  Hg, 

C4  =  ventilation  rate  required  to  remove  moisture  load,  cfm, 

C5  =  ventilation  rate  required  to  remove  heat  load,  cfm, 

El  =  vapor  pressure  of  incoming  air,  in  Hg, 

HI  =  enthalpy  of  incoming  air  at  incoming  temperature, 

BTU/lb  d. a. , 

H2  =  enthalpy  of  incoming  air  at  inside  temperature, 

BTU/lb  d. a. , 

HG2  =  enthalpy  of  saturated  water  vapor  at  inside  temperature, 
BTU/lb, 

HG3  =  enthalpy  of  saturated  water  vapor  at  incoming  temperature, 
BTU/lb, 

PW1  =  saturation  pressure  at  incoming  wet-bulb  temperature, 

in  Hg, 

PW2  =  saturation  pressure  at  inside  dry-bulb  temperature, 

in  Hg, 

PW3  =  saturation  pressure  at  incoming  dry-bulb  temperature, 

in  Hg, 

QSUM  =  total  heat  transfer  through  the  structural  components  of  the 
confinement  unit,  BTU/hr, 

SENS  =  total  sensible  heat  production  of  the  confined  animals  and 
other  sources  within  the  confinement  unit,  BTU/hr, 

RH  =  relative  humidity  at  ventilation  rate  required  to  remove 
moisture,  percent, 
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RH1  =  relative  humidity  at  ventilation  rate  required  to  remove 
heat  load,  percent, 

RH2  =  incoming  relative  humidity,  percent, 

SUMQ  =  total  sensible  heat  load  within  confinement  unit,  BTU/hr, 

SUP  =  heat  load  necessary  to  ensure  a  ventilation  rate  required 

to  remove  moisture,  BTU/hr, 

TW1  =  incoming  wet-.bulb  temperature,  °F, 

U  =  degree  of  saturation, 

3 

VI  =  specific  volume  of  incoming  air,  ft  /lb  d.a., 

WM  =  total  moisture  production  within  the  confinement  unit, 

lb  moisture/lb  d.a., 

WS  =  absolute  humidity  at  saturation  (inside  conditions), 
lb  moisture/lb  d.a., 

WSS  =  absolute  humidity  at  saturation  (outside  conditions), 
lb  moi sture/lb  d.a. , 

W1  =  absolute  humidity  of  incoming  air,  lb  moisture/lb  d.a. 


. 
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C8. 

A 

C 

I 

P 

PP 

T 

TT 


PH20  and  PICE  Variable  Names  and  Units. 

=  absolute  temperature,  °K, 

=  temperature,  °C, 

=  time,  hr, 

=  saturation  vapor  pressure,  atmospheres, 

=  saturation  vapor  pressure,  in  Hg, 

=  temperature,  °F, 

=  8  =  27^]6_ 
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APPENDIX  D:  INPUT  DATA  FORMAT 


Group  Variable 


Variable  Number  Format 
Name  of 

Cards 


I 

1.  simulation  period 

TNT 

1  1  X,F3.( 

2.  attic  thickness 

3.  emissivity  factor 

AVH 

6F3.2 ,1 

for  outer  wall  surface 

EW 

4.  absorptivity  factor  for 

outer  wall  surface 

AW 

5.  absorptivity  factor  for 

roof  surface 

AR 

6.  emissivity  factor  for 

roof  surface 

ER 

7.  heat  transfer  coefficient 

for  windows  installed 

UA 

8.  shading  coefficient 

9.  relative  humidity  at 

SC 

ventilation  rate  required 
to  remove  moisture 

RH 

II 

supplemental  heat  output 

of  heater 

HEATR 

3,5,7,9a  11F7.0 

III 

hog  weight 

HOGWT 

1  10F3.0 

IV 

hog  nunber 

HOGS 

1  10F3.0 

V 

1 .  management  factor  for 

MGMT 

1  2F4.2 

moisture  production 

2.  management  factor  for 

MGMTS 

sensible  heat  production 

VI 

barometric  pressure 

B 

2 ,3,5 ,6a  16F5.2 

VI  Ib 

1.  total  number  of  animals 

AN 

1  17F4.0 

2.  area  of  east  wall 

AEWA 

3.  area  of  north  wall 

ATWA 

4.  area  of  south  wall 

ASWA 

5 .  area  of  west  wall 

AWWA 

6 .  area  of  east  doors 

AEDO 

7.  area  of  north  doors 

AT  DO 

8.  area  of  south  doors 

AS  DO 

9.  area  of  west  doors 

AWDO 

10.  area  of  east  windows 

AEWI 

11.  area  of  north  windows 

ATWI 

12.  area  of  south  windows 

ASWI 

13.  area  of  west  windows 

AWWI 

14.  perimeter  of  unit 

AFLO 

15.  area  of  east  roof  slope 

AR01 

16.  area  of  west  roof  slope 

AR02 

17.  area  of  horizontal  roof 

AR03 

■ 


. 
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APPENDIX  D:  CONTINUED 


Group 


VIII 

IX 

X 


XI 

XII 

XIII 

XIV 


XV 


XVI 


XVII 


Variable 

Variable 

Number 

Format 

Name 

of 

Cards 

ventilation  rate 

VENT 

3,5 ,7 ,9a 

11F7.0 

allowable  error  in 
ventilation  rate  calculation 

ERROR 

1 

F5.2 

1 .  outsi  de  ai  r  fi  lm 

conductance  coefficient 

C0EF1 

1 

6F4.2 

2.  inside  air  film 

conductance  coefficient 
for  horizontal  roof 

COEFI(l) 

3.  inside  air  film 

conductance  coefficient 
for  walls 

COEFI (2) 

4.  inside  air  film 

conductance  coefficient 
for  pitched  roof 

COEFI (3) 

5.  emissivity  factor  for 
upper  attic  surface 

6.  emissivity  factor  for 

EE1 

lower  attic  surface 

EE2 

ingoing  temperature  indicator 

IATTIC 

1 

13 

attic  dry-bulb  temperature 

ATTD 

2,4,6,8a 

,c  12F6.1 

attic  wet-bulb  temperature 

at™ 

2,4,6,8a 

,c  12F6.1 

polynomial  coefficients  for 
use  in  calculation  of 
absorption  factor  of  the 
inner  window  pane 

AIN 

1 

6F10.5 

polynomial  coefficients  for 
use  in  calculation  of 
absorption  factor  of  the 
outer  window  pane 

AOUT 

1 

6F10.5 

polynomial  coefficients  for 
use  in  calculation  of  the 
transmission  factor  of  the 
window 

T 

1 

6F10.5 

1.  latitude  of  location 

PLAT 

1 

2F7.2,2F3.0 

2.  longitude  of  location 

PLONG 

3A4 

3.  time  zone  number 

4.  daylight  saving  time 

TZN 

indi cator 

DST 

5.  location 

L0,CA,TX 

fYr:jo:  ■'  "•  '  “I 
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APPENDIX  D:  CONTINUED 


Group  Variable 


Variable  Number  Format 

Name  of 

Cards 


XVIII 

b,d 

1.  surface  tilt  angle 

WALLT 

7 

2F7.2,I3 

2.  surface  azimuth  angle 

WALLA 

2X,3A4 

3.  counter 

ISTOP 

4.  surface  indicator 

EA,EB ,EC 

XIX 

1 .  day  of  the  year 

D 

1 

F5 .0 ,3A4 

2.  date 

x,u,z 

CU 

X 

X 

1 .  clearance  number 

CN 

1 

F4. 1,11, 

2.  cloud  type 

CT 

F5 .2 ,4F4 

3.  ground  reflectivity 

R 

4.  parameter  a/ho 

5.  coefficient  of  heat 

ARO 

transfer  by  radiation  and 
convection  at  the  outer 

surface 

HO 

6.  inward  flowing  fraction 

of  the  radiation  absorbed 
by  the  inner  window  pane 

Nil 

7.  inward  flowing  fraction 

of  the  radiation  absorbed 
by  the  outer  window  pane 

HID 

XXI 

total  cloud  amount 

TC 

1 

24F2.0 

XXII 

outside  dry-bulb  temperature 

OT 

2 

12F5.1 

XXIII 

outside  wet-bulb  temperature 

OW 

2 

12F5.1 

XXI VJ 

vari  able 

XXV 

1.  sampling  time  interval 

DT 

1 

F10.3,I2 

2.  surface  indicator 

3.  direction  of  heat  flow 

I  COMP 

F2.0 

through  the  attic  space 

111 

XXVI 

title 

TEXT1 

2 

80  A 1 

XXVII 

1.  layer  thickness 

XL 

vari able 

f  5F10.4, 

2.  thermal  conductivity 

XK 

30A1 

3.  density 

D 

4.  specific  heat 

SH 

5.  resistance 

RES 

6.  description  of  layer 

TEXT 

XXVIII9 


1 
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APPENDIX  D:  CONTINUED 


Group 

Vari able 

Variable 

Name 

Number 

of 

Cards 

Format 

XXIX 

1.  boundary  conditions 

I  CASE 

1 

11,11 

2.  number  of  frequencies 

NW 

XXX 

frequency  periods 

W 

lc 

8F10.4 

-C 

1 — 1 

X 

X 

X 

vari  able 

X 

X 

X 

l-H 

t— ( 

1 

a. 

Each  number  represents  the 

number  of  cards 

requi  red 

for  1 ,2,3 

and  4  days  of  simulation  respectively. 

b.  The  orientations  may  be  altered  in  Group  VII  but  must  correspond 
with  the  orientation  as  specified  in  Group  XVIII.  (e.g.  where  the 
east  surface  is  altered  to  some  other  orientation  in  Group  VII, 
the  card  representing  the  east  slope,  i.e.,  card  number  3  of 
Group  XVIII,  must  be  altered  to  represent  this  new  orientation). 

c  Optional 

d.  There  must  be  seven  surfaces  whose  orientation  is  specified.  These 
must  be  in  the  following  order:  south  wall,  west  wall,  east  wall, 
north  wall,  west  roof  slope,  east  roof  slope  and  horizontal  roof. 
Where  there  are  less  than  seven  orientations,  insert  'dummy'  data. 
Note:  The  order  may  be  altered  to  suit  the  specific  situation, 
but  the  changes  must  be  made  simultaneously  to  Group  VII. 

e.  Data  must  correspond  to  the  data  specified  in  Group  XIX. 

f.  One  card  is  necessary  for  each  layer  of  the  component,  to  a 
maximum  of  20  layers  per  component. 

g.  A  blank  card  must  be  inserted  to  terminate  the  input  of  Group  XXVII. 


'  - 
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APPENDIX  D:  CONTINUED 

h.  Group  XXV  to  Group  XXX  must  be  repeated  for  each  of  the  four 
surfaces,  i.e.,  walls,  horizontal  roof,  pitched  roof,  and  doors. 
When  either  the  horizontal  roof  or  pitched  roof  is  used,  insert 
'dummy'  data  for  this  section  not  used. 

i.  A  blank  card  must  be  inserted  to  terminate  the  reading  of  input. 

j.  Group  XIX  to  Group  XXIII  must  be  repeated  for  each  day  of  the 
simulation  period. 


. 


• 
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APPENDIX  E:  INPUT  DATA  SPECIFICATION. 

The  following  input  variables  are  defined  and  specified  as  in 
Appendix  D.  The  order  in  which  they  are  specified  is  also  as  per 
Appendi  x  D. 

I*  TNT  =  0  for  one  day, 

=  1  for  two  days, 

=  2  for  three  days,  and 
=  3  for  four  days; 

AVH  =  one-half  the  gable  height  (inches); 

EW 
AW 

AR  }=  constants; 

ER 
UA 
SC 

RH  =  percent  relative  humidity; 

II  HEATR  =  British  Thermal  Units  per  hour  for  each  hour  of  the 

simulation  period; 

III  HOGWT  =  the  weight  (pounds)  of  a  maximum  of  ten  groups  of  hogs; 

IV  HOGS  =  the  number  of  hogs  in  each  of  the  weight  groups  specified 

in  HOGWT; 

V  MGMT  =  constant, 

e.g.  1.20  represents  an  increase  of  20%  while 
0.80  represents  a  decrease  of  20%  over  the 
data  of  Bond  et  al  (26); 

MGMTS  =  constant,  e.g.,  as  per  MGMT; 


*  Group  as  per  Appendix  D. 


'  \ 


259 


APPENDIX  E:  CONTINUED 

VI  B  =  inches  of  mercury  for  each  hour  of  the  simulation  period; 

VII  AN  =  constant,  i.e.,  total  number  of  hogs  confined; 


AEWA 
ATWA 
ASWA 
AWWA 
AEDO 
AT  DO 
ASDO 
AW  DO 
AEWI 
ATWI 
ASWI 
AWWI 
AR01 
AR02 
AR03 


►=  areas  of  the  component  in  square  feet; 


AFLO  =  perimeter  of  unit  in  feet; 

VIII  VENT  =  cubic  feet  per  minute  for  each  hour  of  the  simulation 


IX 

X 


peri  od; 

ERROR  =  constant,  e.g.,  0.03  for  +  3 %  error; 
C0EF1 


COEFI(l) 
COEFI (2) 
COEFI  (3) 
EE1 


►=  British  Thermal  Uni ts/(foot;  (hour) (degree  Fahrenheit); 


)-  constants; 


EE2 
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APPENDIX  E:  CONTINUED 

XI  IATTIC  =  0  for  outside  temperature ,  and 


=  1  for  attic  temperature; 

XII  ATTD 

=  degrees  Fahrenheit; 

XIII  ATTW 

=  degrees  Fahrenheit; 

XIV  AIN 

►  constants;  these  are  designed  for  double-glazed  windows. 

XV  AOUT 

If  only  single-glazed  windows  exist,  the  values  are 

XVI  T 

i 

entered  for  calculation  of  the  absorption  factor  of  the 

inner  window  pane  and  the  coefficients  for  the  outer  pane 

are  set  to  zero  (blank  card); 

XVII  PLAT 

=  degrees,  +  North,  and 

-  South; 

PLONG 

=  degrees,  +  West,  and 

-  East; 

TZN  =  constant,  hours  behind  Greenwich  mean  time; 

DST  =  0  for  standard  time,  and 
=  1  for  daylight  saving  time; 

LO  ' 

CA  >=  any  symbols  up  to  a  maximum  of  twelve  characters; 


TX 

4 

XVIII  WALLT 

=  degrees  from  horizontal; 

WALLA 

=  degrees  from  South,  +  West  of  South,  and 

-  East  of  South; 

ISTOP 

=  nunbers  one  to  seven,  one  for  each  surface,  to  ensure 

that  seven  cards  are  inserted; 

EA 

EB  1=  any  combination  of  twelve  symbols  indicating  the  surface 
EC  in  consideration; 

4 


9r.6  ™ii)0  ertl  t©>  eUnstomstt)  ftrtt  bne  fwe:  viobnrw  onnt 
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APPENDIX  E:  CONTINUED 


XIX  D  *  day  of  the  year,  1  to  366; 


X 

U 

Z 


►=  date,  any  combination  of  twelve  symbols  indicating  the  date; 


XX  CT  =  0  for  cirrus  or  ci  rrostratus , 

=  1  for  stratus,  and 
=  2  for  other  type; 

CN  =  constant; 

R  =  constant; 

ARO  =  a/ho,  where  a  =  absorptance  of  the  surface  for  solar 

radiation,  and 

ho  =  coefficient  of  heat  transfer  by  radiation 
and  convection  at  the  outer  surface, 
BTU/(hr)(ft)2(°F); 

HO  =  British  Thermal  Uni ts/(hour) (square  foot) (degree  Fahrenheit) 


Nil] 

>=  constants; 

NIO] 

XXI  TC  =  constant  value  on  the  scale  of  0  to  10  for  each  hour  of  the 

simulation  period,  0  representing  no  cloud  cover  and  10 
representing  total  cloud  cover; 

XXII  OT  =  degrees  Fahrenheit; 

XXIII  OW  =  degrees  Fahrenheit; 


XXV  DT  =  hours; 

ICOMP  =  1  for  walls , 

=  2  for  pitched  roof, 

=  3  for  horizontal  roof,  and 


=  4  for  doors; 


OP  A 


- 

* 
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APPENDIX  E:  CONTINUED 

ZZZ  =  1  for  upwards,  and 

=  2  for  downwards; 

XXVI  TEXT1  =  any  title; 

XXVII  XL  =  feet; 

XK  =  British  Thermal  Uni ts/(hour) (degree  Fahrenhei t) (foot)^ ; 

D  =  pounds/cubic  foot; 

SH  =  British  Thermal  Units/(pound)(degree  Fahrenheit); 

RES  =  resistance  of  the  radiation  path  whenever  applicable  or 
thermal  resistance  of  layer  when  there  is  negligible  heat 
storage; 

TEXT  =  any  characters  representing  the  description  of  the  layer; 
XXIX  I  CASE  =  boundary  conditions  of  the  first  kind  (temperature, 

given  for  both  surfaces) 

A)  ramp  input, I  CASE  =  1, 

B)  frequency  response,  I  CASE  =  2,  and 

of  the  second  kind  (flux  given  for  both  surfaces) 

A)  step  input,  ICASE  =  3, 

B)  ramp  input,  ICASE  =4,  and 

C)  frequency  response,  ICASE  =  5; 

NW  =  number  of  frequencies  only  when  frequency  response  is 
involved;  and 

U  =  frequency  periods  only  when  frequency  response  is  involved. 


■ 


■ 
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APPENDIX  F:  TIME  REPRESENTATION 


Hour 

Actual  Time 

Hour 

Actual  Time 

1 

1 : 00  AM,  September  10 

25 

1 :00  AM,  September  1 1 

2 

2:00  AM,  September  10 

26 

2:00  AM,  September  11 

3 

3:00  AM,  September  10 

27 

3:00  AM,  September  11 

4 

4:00  AM,  September  10 

28 

4:00  AM,  September  11 

5 

5:00  AM,  September  10 

29 

5:00  AM,  September  11 

6 

6:00. AM,  September  10 

30 

6:00  AM,  Septenber  11 

7 

7:00  AM,  September  10 

31 

7:00  AM,  September  11 

8 

8:00  AM,  September  10 

32 

8:00  AM,  September  11 

9 

9:00  AM,  September  10 

33 

9:00  AM,  September  11 

10 

10:00  AM,  Septenber  10 

34 

10:00  AM,  September  11 

11 

11 :00  AM,  September  10 

35 

11:00  AM,  Septemger  11 

12 

NOON,  September  10 

36 

NOON,  September  11 

13 

1 :00  PM,  September  10 

37 

1 :00  PM,  September  1 1 

14 

2:00  PM,  September  10 

38 

2:00  PM,  September  11 

15 

3:00  PM,  September  10 

39 

3:00  PM,  September  11 

16 

4:00  PM,  September  10 

40 

4:00  PM,  September  11 

17 

5:00  PM,  September  10 

41 

5:00  PM,  September  11 

18 

6:00  PM,  September  10 

42 

6:00  PM,  September  11 

19 

7:00  PM,  September  10 

43 

7:00  PM,  September  11 

20 

8:00  PM,  September  10 

44 

8:00  PM,  September  11 

21 

9:00  PM,  September  10 

45 

9:00  PM,  Septenber  11 

22 

10:00  PM,  September  10 

46 

10:00  PM,  September  11 

23 

11 :00  PM,  September  10 

47 

11 :00  PM,  September  11 

24 

MIDNIGHT,  Septenber  10 

48 

MIDNIGHT,  September  11 

[  ,f*A  00:  f 
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APPENDIX  F:  CONTINUED 


Hour  Actual  Time 


49 

1:00 

AM,  September  12 

50 

2:00 

AM,  September  12 

51 

3:00 

AM,  September  12 

52 

4:00 

AM,  September  12 

53 

5:00 

AM,  September  12 

54 

6:00 

AM,  September  12 

55 

7:00 

AM,  September  12 

56 

8:00 

AM,  September  12 

57 

9:00 

AM,  September  12 

58 

10:00  AM,  September  12 

59 

1 1 : 00  AM,  September  12 

60 

NOON, 

,  September  12 

61 

1:00 

PM,  September  12 

62 

2:00 

PM,  September  12 

63 

3:00 

PM,  September  12 

64 

4:00 

PM,  September  12 

65 

5:00 

PM,  September  12 

66 

6:00 

PM,  September  12 

67 

7:00 

PM,  September  12 

68 

8:00 

PM,  September  12 

69 

9:00 

PM,  September  12 

70 

10:00  PM,  September  12 

71 

11:00  PM,  September  12 

72 

MIDNIGHT,  September  12 

■'  •  :■»  ■  ■  •'  .>Ki  00:t  \. 
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APPENDIX  G:  DATA. 


The  tables  in  this  appendix  are  the  experimentally  recorded 
data  (observed)  as  well  as  the  data  predicted  by  the  model. 


' 


Ti 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 
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Gl:  OBSERVED  DRY -BULB  TEMPERATURES,  °F. 


_ Inside _  Outside 

Parallel 

Circuit  12"  16" 

Average  fan  fan 


75.8 

75.6 

74.0 

64.2 

73.5 

73.5 

70.8 

59.6 

72.0 

72.0 

69.4 

56.5 

70.5 

70.3 

67.7 

52.9 

69.4 

69  .1 

66.4 

51.3 

68.2 

68.1 

73.2 

52.1 

68.0 

67.9 

76.4 

53.6 

68.0 

67.5 

75.5 

53.0 

67.4 

67.3 

77.1 

51.7 

66.7 

66.8 

69.4 

51.8 

66.4 

66 .4 

67.7 

51.5 

66.1 

66.1 

69.8 

49.6 

66.8 

66.9 

64.2 

52.2 

69.4 

68.6 

71.8 

55.9 

69.2 

69.2 

65.4 

59.6 

71.1 

71.1 

67.9 

62.3 

73.2 

73.2 

70.8 

66.4 

76.2 

75.6 

74.6 

69.1 

78.5 

77.5 

76.8 

72.4 

80.4 

79.2 

78.7 

75.6 

81.3 

80.1 

79.9 

76.1 

82.1 

80.6 

80.5 

77.2 

80.8 

79.9 

80.1 

74.0 

78.6 

78.5 

77.0 

70.3 

77.6 

77.2 

77.2 

67.8 

75.0 

75.0 

72.8 

59  .4 

73.0 

73.0 

70.7 

59.5 

71.8 

72.1 

69.4 

57.5 

68.7 

69  .8 

67.5 

52.6 

68.6 

68.8 

66.3 

51.8 

Attic 


73.1 

67.4 

63.3 

59.5 
57.0 

55.7 

56.1 

56.3 

55.6 

55.1 
55.0 

53.5 
53.0 

56.6 

60.4 

66 . 4 

71.3 

77.8 

82.5 

85.8 

86.4 

86.2 

82.8 

78.4 
73.8 

68.6 

64.5 
63.0 
60.2 

57.7 


Cont ’ d 
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TABLE  Gl:  Continued 


Time 

Inside 

Outside 

Parallel 

Circuit 

Average 

12" 

fan 

16" 

fan 

50 

67.3 

67.5 

65.6 

51.7 

51 

66.3 

66.9 

65.0 

50.4 

52 

65.6 

66.1 

63.8 

49.9 

53 

65.4 

65.6 

62.7 

50.3 

54 

65.4 

65.7 

62.2 

49.0 

55 

65.4 

65.4 

64.0 

48.7 

56 

66.3 

66.2 

63.3 

49.1 

57 

68.0 

67.5 

71.1 

50.4 

58 

67.6 

67.5 

69.7 

50.6 

59 

66.4 

66.5 

66.6 

48.0 

60 

66.4 

66 . 4 

64.8 

44.3 

61 

66.8 

66.5 

64.0 

44.4 

62 

67.2 

66  .6 

64.8 

43.3 

63 

65.5 

65.3 

64.0 

42.4 

64 

65.3 

65.0 

62.3 

39.0 

65 

64.0 

64.0 

61.7 

39.0 

66 

62.2 

62.4 

59.7 

37.3 

67 

60.5 

60.7 

57.8 

35.4 

68 

62.5 

62.5 

57.5 

33.3 

69 

60.4 

60.6 

57.4 

33.7 

Attic 


56.4 

55.8 

54.6 

54.5 

53.5 

52.5 

51.5 
53.2 

55.1 
55.0 

54.1 

53.1 

52.9 

50.9 

49.5 

47.7 

46.1 

44.6 

42.6 

42.8 


■ 


20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 
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OBSERVED  AND  PREDICTED  RELATIVE  HUMIDITIES,  %. 


Outside 

Attic 

Inside 

Observed 

Model  A 

Model  B 

68.7 

52.2 

62.9 

63.1 

62.8 

71.8 

60.4 

65.7 

65.1 

65.0 

77.7 

66.9 

68.6 

70.0 

69.9 

82.6 

69  .8 

71.2 

73.0 

73.0 

80.9 

71.6 

70.8 

72.3 

72.3 

78.3 

72.1 

71.6 

71.8 

71.8 

76.0 

70.7 

71.1 

71.1 

71.1 

78.1 

70.8 

71.5 

71.9 

71.9 

79.3 

72.0 

71.7 

72.0 

72.0 

80.5 

72.3 

71.0 

73.5 

73.5 

78.1 

72.3 

70.9 

71.4 

71.4 

80.4 

72.7 

71.2 

72.1 

72.1 

77.8 

71.3 

68.0 

70.9 

70.7 

72.2 

69.4 

69.2 

66.4 

65.8 

66.5 

65.9 

67.0 

62.0 

60.8 

59.7 

61.2 

65.8 

56.4 

55.1 

57.0 

60.2 

65.6 

55.6 

53.7 

56.3 

56.3 

62.4 

55.6 

53.7 

53.0 

53.5 

61.7 

53.8 

51.9 

50.0 

51.8 

60.4 

52.6 

50.8 

48.0 

51.5 

64.5 

50.3 

48.6 

46.8 

50.5 

60.5 

49.8 

48.4 

52.2 

52.7 

62.0 

52.9 

51.7 

58.6 

57.0 

65.6 

57.2 

56.4 

61.2 

63.4 

68.5 

59.4 

59.1 

73.9 

63.3 

69.4 

65.6 

65.4 

70.9 

65.0 

69.0 

66.1 

66.0 

75.6 

66.5 

70.6 

69.5 

69.4 

82.7 

67.8 

71.0 

72.5 

72.5 

81.8 

69.0 

69.3 

73.2 

73.2 

82.4 

69.9 

70.0 

74.4 

74.4 

Cont ’ d 
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51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 
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Continued 


Outside 

At  tic 

Inside 

Observed 

Model  A 

Model  B 

83.2 

69.1 

70.5 

74.4 

74.4 

83.0 

70.6 

70.2 

74.5 

74.5 

83.1 

70.5 

71.0 

75.2 

75.2 

80.8 

70.0 

69.3 

72.6 

72.6 

78.2 

71.7 

71.1 

70.8 

70.8 

75.3 

70.6 

67.1 

67.8 

67.6 

76.5 

69.9 

69.6 

68.7 

68.2 

75.4 

67.4 

70.7 

67.1 

66.2 

73.6 

67.6 

70.2 

63.8 

62.6 

69.5 

67.1 

69.8 

59.8 

58.4 

74.9 

68.7 

70.0 

65.1 

63.4 

77.1 

68.0 

70.1 

66.5 

64.8 

78.1 

66.2 

71.2 

67.2 

65.4 

72.5 

66.4 

69.4 

62.2 

60.6 

73.2 

65.2 

68.3 

64.1 

62.2 

71.1 

66.0 

70.7 

63.4 

62.2 

67.3 

66.2 

72.3 

60.3 

59.6 

62.8 

71.7 

64.8 

51.6 

51.3 

66.9 

67.6 

70.8 

54.2 

54.1 

* 


1 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 
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OBSERVED  AND  PREDICTED  INSIDE  DRY -BULB  TEMPERATURES,  °F. 


Observed  Model  A  _ Model  B _ 

Outside  Attic 

as  incoming  as  incoming 

temperature  temperature 


75.8 

70.9 

71.1 

78.0 

73.5 

66.6 

66.7 

72.9 

72.0 

63.7 

63.7 

69.1 

70.5 

60.5 

60.5 

65.6 

69.4 

58.7 

58.7 

63.3 

68.2 

58.8 

58.8 

62.0 

68.0 

59.8 

59.8 

62.0 

68.0 

59.6 

59.6 

62.2 

67.4 

58.7 

58.7 

61.7 

66.7 

58.6 

58.6 

61.2 

66 .4 

58.4 

58.4 

61.1 

66.1 

57.0 

57.0 

60.0 

66.8 

59.2 

59.3 

60.3 

69.4 

62.7 

63.1 

63.7 

69.2 

66.1 

66.7 

67.4 

71.1 

68.8 

70.2 

72.4 

73.2 

72.1 

73.2 

76.6 

76.2 

74.4 

75.6 

81.5 

78.5 

77.1 

78.3 

85.3 

80.4 

79.6 

80.7 

87.8 

81.3 

80.4 

81.4 

88.7 

82.1 

81.1 

82.0 

88.5 

80.8 

78.9 

79.6 

86.0 

78.6 

75.8 

76.2 

82.4 

77.6 

73.3 

73.5 

78.4 

75.0 

67.0 

67.1 

73.6 

73.0 

65.8 

65.8 

70.1 

71.8 

64.1 

64.1 

68.3 

68.7 

60.4 

60.4 

65.9 

68.6 

59.1 

59.1 

63.8 

Cont ’ d 


\ 

. 


Ti 

50 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 
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Continued 


Observed 

Model  A 

Model  B 

Outside 
as  incoming 
temperature 

Attic 

as  incoming 
temperature 

67.3 

58.7 

58.7 

62.6 

66.3 

57.7 

57.7 

61.9 

65.6 

57.2 

57.2 

60.9 

65.4 

57.3 

57.3 

60.6 

65.4 

56.4 

56.4 

59.9 

65.4 

56.0 

56.0 

59.1 

66.3 

56.8 

56.9 

59.0 

68.0 

58.0 

58.2 

60.4 

67.6 

58.5 

58.9 

62.5 

66.4 

56.9 

57.5 

62.6 

66.4 

54.1 

54.8 

62.0 

66.8 

53.5 

54.2 

61.1 

67.2 

52.5 

53.3 

60.7 

65.5 

51.7 

52.5 

59.3 

65.3 

49.1 

49.9 

57.9 

64.0 

48.5 

49.2 

56.2 

62.2 

47.0 

47.6 

54.5 

60.5 

45.2 

45.6 

52.7 

62.5 

46.4 

46 . 6 

53.9 

60.4 

46.7 

46.7 

53.9 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 
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G4:  OBSERVED  AND  PREDICTED  NORTH  WALL  SURFACE  TEMPERATURES,  °F. 


Outside  Inside 


Observed 

Model  A 

Model  B 

Observed 

Model  A 

Model  B 

60.8 

65.0 

65.2 

71.9 

71.7 

71.9 

56.0 

60.2 

60.2 

69.9 

67.2 

67.3 

53.4 

57.0 

57.0 

68.4 

64.0 

64.0 

51.3 

53.4 

53.4 

66.6 

60.7 

60.8 

50.4 

51.6 

51.6 

65.2 

58.7 

58.7 

51.3 

52.2 

52.2 

64.1 

58.4 

58.4 

52.8 

53.6 

53.6 

63.8 

59.2 

59.2 

52.3 

53.2 

53.2 

63.8 

59.2 

59.2 

50.8 

51.9 

51.9 

63.4 

58.4 

58.4 

51.3 

51.9 

51.9 

62.6 

58.4 

58.4 

50.8 

51.7 

51.7 

62.4 

58.0 

58.0 

48.8 

49.9 

49.9 

61.9 

56.8 

56.8 

50.9 

52.6 

53.5 

60.7 

58.4 

58.5 

55.5 

57.0 

59.5 

63.2 

61.6 

62.0 

60.2 

61.4 

65.1 

63.3 

65.0 

65.7 

63.3 

64.7 

69.5 

65.2 

67.9 

69.3 

66.9 

69.1 

74.6 

67.2 

71.1 

72.5 

69.9 

72.1 

78.0 

69.6 

73.7 

75.2 

72.5 

75.3 

81.0 

71.9 

76.4 

77.9 

75.4 

77.7 

82.2 

74.2 

78.9 

80.3 

74.6 

78.7 

83.5 

75.7 

80.0 

81.3 

74.4 

78.9 

82.0 

76.6 

80.8 

81.9 

71.4 

75.5 

77.6 

76.4 

79.1 

80.0 

67.6 

71.2 

72.1 

75.2 

76.2 

76.7 

65.8 

68.2 

68.3 

73.7 

73.6 

73.8 

56.6 

60.3 

60.3 

71.7 

67.8 

68.0 

58.8 

59.7 

59.7 

69.6 

65.8 

65.8 

57.7 

57.8 

57.8 

68.2 

64.1 

64.1 

52.0 

53.2 

53.2 

65.2 

60.7 

60.7 

51.0 

52.1 

52.1 

62.9 

59.0 

59.0 

51.9 

51.9 

51.9 

61.3 

58.4 

58.4 

Cont ’  d. 


* 

s,ed 
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TABLE  G4:  Continued 


Time  _  Outside  Inside 


Observed 

Model  A 

Model  B 

Observed 

Model  A 

Model  B 

51 

51.3 

50.7 

50.7 

60.6 

57.4 

57.4 

52 

50.7 

50.1 

50.1 

59.5 

56.8 

56.8 

53 

51.0 

50.4 

50.4 

59.2 

56.8 

56.8 

54 

48.6 

49.3 

49.3 

58.6 

56.1 

56.1 

55 

48.0 

48.9 

48.9 

60.6 

55.6 

55.6 

56 

48.1 

49.6 

50.3 

60.2 

56.2 

56.3 

57 

51.4 

51.2 

52.5 

62.0 

57.3 

57.5 

58 

53.6 

51.8 

53.8 

62.3 

57.9 

58.4 

59 

51.0 

49.8 

52.3 

61.7 

56.7 

57.4 

60 

49.7 

46.4 

49.3 

61.4 

54.2 

55.0 

61 

49.3 

46.3 

49.4 

62.1 

53.2 

54.1 

62 

46.5 

45.3 

48.4 

61.2 

52.2 

53.2 

63 

45.2 

44.3 

47.2 

60.0 

51.4 

52.3 

64 

43.0 

40.9 

43.5 

59.3 

49.1 

50.0 

65 

41.2 

40.4 

42.5 

58.0 

48.2 

49.0 

66 

40.1 

38.4 

39.9 

56.8 

46.7 

47.4 

67 

39.2 

36.1 

36.8 

55.6 

45.0 

45.5 

68 

36.8 

33.8 

33.8 

56.7 

45.5 

45.7 

69 

36.9 

33.9 

34.0 

57.0 

45.8 

45.8 

Ti 

20 

21 

22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 
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G5 :  OBSERVED  AND  PREDICTED  WEST  WALL  SURFACE  TEMEPRATURES ,  °F. 


Outside 

Inside 

Observed 

Model  A 

Model  B 

Observed 

Model  A 

Model 

71.4 

65.6 

66.7 

77.2 

71.9 

72.6 

60.9 

60.3 

60.3 

73.2 

67.2 

67.5 

56.7 

57.0 

57.0 

70.1 

64.0 

64.0 

53.6 

53.4 

53.4 

67.5 

60.7 

60.8 

51.7 

51.6 

51.6 

65.6 

58.7 

58.7 

52.2 

52.2 

52.2 

64.2 

58.4 

58.4 

53.5 

53.6 

53.6 

63.8 

59.2 

59.2 

53.5 

53.2 

53.2 

64.0 

59.2 

59.2 

52.5 

51.9 

51.9 

63.5 

58.4 

58.4 

52.7 

51.9 

51.9 

63.0 

58.4 

58.4 

52.1 

51.7 

51.7 

62.9 

58.0 

58.0 

50.4 

49.9 

49.9 

62.4 

56.8 

56.8 

52.2 

52.6 

53.4 

62.1 

58.4 

58.5 

56.9 

57.0 

59.5 

63.7 

61.6 

62.0 

60.7 

61.4 

65.1 

64.7 

65.0 

65.7 

64.0 

64.7 

69.5 

66.8 

67.9 

69.3 

67.1 

69.1 

74.6 

69.0 

71.1 

72.5 

71.1 

72.2 

78.2 

71.9 

73.7 

75.2 

76.4 

77.4 

87.0 

74.6 

76.4 

78.1 

87.0 

82.5 

95.7 

77.1 

79.1 

81.0 

92.9 

88.0 

109.9 

79.7 

80.5 

82.7 

100.8 

87.9 

107.8 

82.3 

81.4 

83.6 

84.5 

84.1 

102.3 

81.5 

79.7 

81.7 

62.4 

75.6 

84.6 

78.8 

76.6 

77.9 

67.8 

68.5 

69.3 

76.3 

73.7 

74.3 

58.1 

60.3 

60.4 

73.7 

67.9 

68.1 

58.9 

59.7 

59.7 

70.7 

65.8 

65.9 

58.5 

57.8 

57.8 

69.6 

64.1 

64.1 

53.4 

53.2 

53.2 

67.8 

60.7 

60.7 

52.1 

52.1 

52.1 

66 . 4 

59.0 

59.0 

52.5 

51.9 

51.9 

65.4 

58.4 

Cont ’ d. 

58.4 

• 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 
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G5:  Continued 


Outside 

Inside 

Observed 

Model  A 

Model  B 

Observed 

Model  A 

Model  B 

51.9 

50.7 

50.7 

64.7 

57.4 

57.4 

51.4 

50.1 

50.1 

63.8 

56.8 

56.8 

51.8 

50.4 

50.4 

63.6 

56.8 

56.8 

50.0 

49.3 

49.3 

62.7 

56.1 

56.1 

49.0 

48.9 

48.9 

62.1 

55.6 

55.6 

49.4 

49.6 

50.3 

61.7 

56.2 

56.3 

51.8 

51.2 

52.5 

62.9 

57.3 

57.5 

53.3 

51.8 

53.8 

63.2 

57.9 

58.4 

50.5 

49.8 

52.3 

62.8 

56.7 

57.4 

49.1 

46.4 

49.3 

62.3 

54.2 

55.0 

49.6 

46.4 

49.5 

61.8 

53.2 

54.1 

46.6 

46.5 

51.7 

61.8 

52.3 

53.3 

44.8 

47.7 

56.6 

60.6 

51.5 

52.8 

43.3 

46.2 

58.1 

60.0 

49.4 

50.8 

41.9 

46.7 

60.1 

59.4 

48.5 

50.1 

40.8 

44.5 

56.9 

56.0 

47.2 

48.6 

39.9' 

39.5 

46.2 

56.7 

45.3 

46.3 

37.8 

34.1 

34.6 

57.4 

45.6 

46.1 

38.2 

34.0 

34.0 

56.5 

45.8 

45.9 

. 


.  -  ~ 
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TABLE  G6:  OBSERVED  AND  PREDICTED  SOUTH  WALL  SURFACE  TEMPERATURES,  °F. 


Time 

Outside 

Inside 

Observed 

"  Model  A 

Model  B 

Observed 

Model  A 

Model  B 

20 

63.9 

65.1 

65.3 

74.3 

71.7 

72.0 

21 

59.9 

60.2 

60.2 

69.6 

67.2 

67.3 

22 

56.9 

57.0 

57.0 

67.9 

64.0 

64.0 

23 

53.8 

53.4 

53.4 

66.8 

60.7 

60.8 

24 

52.4 

51.6 

51.6 

65.6 

58.7 

58.7 

25 

52.7 

52.2 

52.2 

64.9 

58.4 

58.4 

26 

54.2 

53.6 

53.6 

65.5 

59.2 

59.2 

27 

53.7 

53.2 

53.2 

65.8 

59.2 

59.2 

28 

53.0 

51.9 

51.9 

66.0 

58.4 

58.4 

29 

53.5 

51.9 

51.9 

63.8 

58.4 

58.4 

30 

52.2 

51.7 

51.7 

62.8 

58.0 

58.0 

31 

50.6 

49.9 

49.9 

62.6 

56.8 

56.8 

32 

53.4 

52.9 

54.4 

62.3 

58.4 

58.5 

33 

59.4 

60.0 

67.8 

65.0 

61.7 

62.3 

34 

73.2 

67.5 

82.4 

65.1 

65.3 

66.6 

35 

75.2 

74.0 

95.8 

67.4 

68.4 

70.8 

36 

90.8 

80.7 

107.4 

70.2 

71.8 

74.5 

37 

97.6 

84.9 

114.3 

73.6 

74.5 

77.5 

38 

100.0 

87.8 

116.6 

76.3 

77.2 

80.3 

39 

98.3 

87.0 

108.6 

78.2 

79.6 

82.4 

40 

93.0 

88.0 

110.2 

79.4 

80.7 

83.2 

41 

91.5 

84.2 

97.4 

80.2 

81.3 

83.3 

42 

79.0 

78.2 

85.3 

79.8 

79.4 

80.8 

43 

71.4 

71.6 

73.3 

76.4 

76.3 

77.0 

44 

68.4 

68.2 

68.4 

73.4 

73.6 

73.9 

45 

61.4 

60.3 

60.3 

71.5 

67.9 

68.0 

46 

60.6 

59.7 

59.7 

68.6 

65.8 

65.8 

47 

58.9 

57.8 

57.8 

68.1 

64.1 

64.1 

48 

54.8 

53.2 

53.2 

66.5 

60.7 

60.7 

49 

53.4 

52.1 

52.1 

65.2 

59.0 

59.0 

50 

53.7 

51.9 

51.9 

64.8 

58.4 

58.4 

Cont ' d 


a.cs 


e.dd 


< 

. 

o.es  ' 

'  d.IT. 
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TABLE  G6:  Continued 


Time 

Outside 

Inside 

Observed 

Model  A 

Model  B 

Observed 

Model  A 

Model  B 

51 

53.1 

50.7 

50.7 

64.6 

57.4 

57,4 

52 

52.5 

50.1 

50.1 

63.3 

56.8 

56.8 

53 

52.6 

50.4 

50.4 

62.3 

56.8 

56.8 

54 

50.4 

49.3 

49.3 

61.6 

56.1 

56.1 

55 

49.7 

48.9 

48.9 

61.9 

55.6 

55.6 

56 

50.0 

49.9 

51.1 

61.9 

56.2 

56.3 

57 

53.3 

52.8 

57.0 

63.9 

57.3 

57.7 

58 

54.8 

55.2 

63.4 

63.7 

58.1 

58.8 

59 

51.9 

54.8 

66.5 

62.6 

57.0 

58.2 

60 

50.6 

52.7 

67.0 

62.4 

54.5 

56.0 

61 

52.2 

53.3 

68.9 

62.8 

53.7 

55.3 

62 

49.8 

52.4 

68.1 

63.3 

52.7 

54.5 

63 

47.7 

50.8 

65.3 

61.9 

51.8 

53.6 

64 

45.9 

46.3 

58.4 

61.5 

49.5 

51.1 

65 

44.1 

44.1 

52.9 

60.0 

48.5 

49.8 

66 

42.4 

40.4 

45.2 

58.9 

46.9 

48.0 

67 

40.9 

36.5 

37.7 

57.8 

45.1 

45.7 

68 

38.8 

33.8 

33.9 

57.5 

45.5 

45.8 

69 

38.7 

33.9 

34.0 

57.4 

45.8 

45.8 
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TABLE  G7 :  OBSERVED  AND  PREDICTED  EAST  WALL  SURFACE  TEMPERATURES,  °F. 


Time  _ Outside _  _ Inside 


Observed 

Model  A 

Model  B 

Observed 

Model  A 

Model  B 

20 

59.5 

65.0 

65.1 

74.7 

71.7 

71.9 

21 

57.8 

60.2 

60.2 

72.0 

67.2 

67.3 

22 

54.7 

57.0 

57.0 

70.0 

64.0 

64.0 

23 

51.5 

53.4 

53.4 

67.9 

60.7 

60.8 

24 

50.8 

51.6 

51.6 

66.2 

58.7 

58.7 

25 

51.8 

52.2 

52.2 

65.0 

58.4 

58.4 

26 

53.4 

53.6 

53.6 

65.0 

59.2 

59.2 

27 

53.4 

53.2 

53.2 

64.9 

59.2 

59.2 

28 

52.4 

51.9 

51.9 

64.4 

58.4 

58.4 

29 

52.7 

51.9 

51.9 

64.0 

58.4 

58.4 

30 

52.1 

51.7 

51.7 

64.0 

58.0 

58.0 

31 

50.4 

49.9 

49.9 

63.3 

56.8 

56.8 

32 

63.2 

57.8 

68.0 

63.9 

58.6 

59.0 

33 

65.3 

67.8 

89.7 

66.3 

62.1 

63.5 

34 

82.0 

72.9 

97.5 

67.9 

65.7 

67.8 

35 

75.4 

74.8 

97.8 

70.2 

68.6 

71.3 

36 

82.1 

75.9 

94.0 

72.2 

71.7 

74.1 

37 

74.1 

74.9 

85.8 

74.7 

74.0 

76.1 

38 

72.4 

75.6 

81.9 

76.6 

76.5 

78.2 

39 

74.2 

77.8 

82.2 

78.5 

78.9 

80.4 

40 

74.4 

78.7 

83.5 

79.5 

80.0 

81.3 

41 

74.1 

78.9 

82.0 

79.9 

80.8 

81.9 

42 

71.5 

75.5 

77.6 

79.1 

79.1 

80.0 

43 

68.6 

71.2 

72.0 

77.6 

76.2 

76.7 

44 

66.5 

68.2 

68.3 

76.0 

73.5 

73.8 

45 

60.4 

60.3 

60.3 

73.8 

67.9 

68.0 

46 

59.9 

59.7 

59.7 

71.3 

65.8 

65.8 

47 

58.5 

57.8 

57.8 

70.1 

64.1 

64.1 

48 

54.3 

53.2 

53.2 

68.2 

60.7 

60.7 

49 

52.9 

52.1 

52.1 

66.7 

59.0 

59.0 

50 

52.9 

51.9 

51.9 

65.7 

58.4 

58.4 

Cont ' d. 


.  Ki 

' 

51 

52 

53 

54 

55 

56 

57 

58 

59 

60 

61 

62 

63 

64 

65 

66 

67 

68 

69 
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G7 :  Continued 


Outside 

Inside 

Observed 

Model  A 

Model  B 

Observed 

Model  A 

Model  B 

52.3 

50.7 

50.7 

64.9 

57.4 

57.4 

51.4 

50.1 

50.1 

64.1 

56.8 

56.8 

51.8 

50.4 

50.4 

63.8 

56.8 

56.8 

50.0 

49.3 

49.3 

63.0 

56.1 

56.1 

49.1 

48.9 

48.9 

62.8 

55.6 

55.6 

50.1 

53.8 

62.1 

62.8 

56.3 

56.7 

56.4 

57.0 

68.9 

64.1 

57.6 

58.4 

57.2 

58.1 

71.5 

64.7 

58.3 

59.5 

51.9 

55.2 

67.5 

64.0 

57.1 

58.5 

50.6 

50.1 

59.6 

63.6 

54.5 

55.8 

51.5 

47.8 

53.5 

63.4 

53.4 

54.5 

49.6 

45.5 

48.9 

63.4 

52.3 

53.3 

47.2 

44.3 

47.3 

62.1 

51.4 

52.4 

45.2 

41.0 

43.5 

61.3 

49.1 

50.0 

43.2 

40.4 

42.5 

60.2 

48.2 

49.0 

41.5 

38.4 

39.9 

59.0 

46.7 

47.4 

40.6 

36.1 

36.7 

57.9 

45.0 

45.5 

38.6 

33.8 

33.8 

58.0 

45.5 

45.7 

38.6 

33.9 

34.0 

57.8 

45.8 

45.8 
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TABLE  G8:  OBSERVED  AND  PREDICTED  ROOF  AND  CEILING  SURFACE 
TEMPERATURES,  °F. 


Time  _ Outside _  Ceiling 


S  East  Slope 

to.  Model  Model 

£.  A  B 

xi  West  Slope 

<u 

> 

a!  Model  Model 

2  A  B 

o 

Observed 

Model 

A 

Model 

B 

20 

59.7 

65.4 

65.1 

66.4 

66.2 

66.6 

75.5 

71.8 

72.1 

21 

55.7 

60.4 

60.4 

56.8 

60.5 

60.6 

73.5 

67.2 

67.3 

22 

52.5 

57.1 

57.1 

52.3 

57.1 

57.1 

72.1 

64.0 

64.0 

23 

49.7 

53.6 

53.6 

48.9 

53.6 

53.6 

70.6 

60.8 

60.8 

24 

48.6 

51.7 

51.7 

47.4 

51.7 

51.7 

69.4 

58.7 

58.7 

25 

49.6 

52.2 

52.2 

48.8 

52.2 

52.2 

68.4 

58.4 

58.4 

26 

51.8 

53.5 

53.5 

51.1 

53.5 

53.5 

68.0 

59.2 

59.2 

27 

51.7 

53.2 

53.2 

51.0 

53.2 

53.2 

67.8 

59.2 

59.2 

28 

50.7 

52.0 

52.0 

50.1 

52.0 

52.0 

67.4 

58.5 

58.5 

29 

51.2 

51.9 

51.9 

50.7 

51.9 

51.9 

66.6 

58.2 

58.2 

30 

50.3 

51.7 

51.7 

49.3 

51.7 

51.7 

66.2 

58.0 

58.0 

31 

48.2 

50.0 

50.0 

47.4 

50.0 

50.0 

65.9 

56.8 

56.8 

32 

55.5 

57.5 

60.8 

49.2 

53.0 

52.2 

65.1 

58.5 

58.7 

33 

62.3 

70.3 

80.5 

54.7 

57.7 

56.7 

67.7 

61.9 

62.5 

34 

82.6 

79.9 

95.5 

66.8 

65.0 

67.4 

67.4 

65.6 

66.5 

35 

84.6 

86.6 

105.0 

73.4 

73.4 

80.1 

69.3 

68.7 

70.5 

36 

99.8 

91.9 

111.0 

84.8 

82.8 

93.9 

71.2 

72.2 

74.1 

37 

104.0 

93.8 

112.1 

95.8 

90.2 

105.3 

73.4 

74.8 

76.9 

38 

102.2 

93.7 

110.4 

101.3 

95.8 

114.3 

75.7 

77.6 

79.7 

39 

98.7 

89.6 

101.5 

105.2 

95.6 

112.9 

77.9 

80.0 

82.0 

40 

91.0 

88.3 

96.3 

101.3 

100.1 

118.9 

79.1 

81.0 

82.8 

41 

86.1 

82.8 

86.9 

103.5 

94.7 

109.4 

79.9 

81.6 

83.1 

42 

76.2 

76.7 

77.8 

87.0 

87.4 

98.1 

79.3 

79.6 

80.8 

43 

70.0 

71.9 

72.2 

73.0 

76.4 

80.8 

78.2 

76.5 

77.1 

44 

66  .6 

68.4 

68.4 

67.2 

68.9 

69.4 

76.7 

73.7 

74.0 

45 

62.1 

60 .6 

60.6 

60.2 

60.7 

60.7 

75.3 

67.9 

68.0 

46 

60.0 

59.8 

59.8 

58.7 

59.8 

59.8 

72.9 

65.8 

65.9 

47 

58.1 

57.9 

57.9 

57.4 

57.9 

57.9 

71.7 

64.1 

64.1 

Cont ’ d. 
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TABLE  G8:  Continued 


Time 


CJ 

> 


East  Slope 


^utside- 


<u 

> 


West  Slope 


'U 

<v 

> 


Celling- 


a) 

M 

£ 

Model 

A 

Model 

B 

CL) 

cn 

x> 

o 

Model 

A 

Model 

B 

j-i 

0) 

m 

<§ 

Model 

A 

Model 

B 

48 

54.8 

53.4 

53.4 

55.3 

53.4 

53.4 

69.2 

60.7 

60.7 

49 

53.0 

52.1 

52.1 

53.8 

52.1 

52.1 

68.6 

59.0 

59.0 

50 

52.2 

51.9 

51.9 

52.5 

51.9 

51.9 

67.7 

58.4 

58.4 

51 

51.6 

50.7 

50.7 

51.7 

50.7 

50.7 

66.8 

57.5 

57.5 

52 

50.7 

50.1 

50.1 

50.8 

50.1 

50.1 

66.2 

56.9 

56.9 

53 

50.9 

50.4 

50.4 

51.3 

50.4 

50.4 

65.7 

56.9 

56.9 

54 

48.2 

49.3 

49.3 

48.4 

49.3 

49.3 

65.0 

56.1 

56.1 

55 

47.9 

48.9 

48.9 

48.0 

48.9 

48.9 

65.4 

55.7 

55.7 

56 

48.0 

53.6 

56.8 

47.5 

50.0 

49.9 

65.2 

56.3 

56.4 

57 

56.0 

58.4 

65.4 

51.7 

51.6 

52.6 

67.0 

57.5 

57.9 

58 

60.2 

62.0 

71.9 

54.3 

53.8 

56.5 

66.7 

58.3 

58.9 

59 

52.3 

61.7 

73.3 

51.1 

54.5 

59.9 

66.0 

57.2 

58.1 

60 

51.8 

58.9 

71.2 

50.2 

54.0 

62.0 

66.0 

54.7 

55.9 

61 

53.8 

58.1 

70.0 

51.9 

56.1 

66.2 

65.9 

53.9 

55.1 

62 

51.7 

55.7 

66.2 

50.0 

56.9 

68.4 

66.2 

52.9 

54.3 

63 

48.7 

52.5 

61.0 

47.1 

56.7 

68.9 

65.0 

52.1 

53.5 

64 

45.9 

46.5 

52.6 

44.7 

53.3 

65.2 

64.6 

49.7 

51.0 

65 

44.2 

43.0 

46.4 

42.9 

51.3 

61.8 

63.7 

48.7 

49.8 

66 

41.7 

39.3 

40.7 

40.9 

46.7 

54.6 

62.1 

47.1 

48.1 

67 

39.7 

36.6 

37.2 

39.8 

40.0 

43.6 

60.5 

45.2 

45.9 

68 

36.7 

33.9 

34.0 

36.8 

34.3 

34.8 

61.2 

45.7 

46.0 

69 

37.2 

34.0 

34.0 

37.5 

34.0 

34.1 

60.2 

45.8 

45.9 

i.es  Ml 
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TABLE  G9 :  OBSERVED  AND  PREDICTED  INSIDE  AIR  DRY-BULB  TEMPERATURES,  °F. 


-d 


Time 

a) 

> 

u 

<u 

CO 

XI 

o 

MGMT 

=  0.80 

MGMT  =  1.00 

MGMT  =  1. 

,20 

MGMTS 

=0.80  =1.00  = 

=  l*-20  = 

MGMTS 

=0.80  =1.00  = 

=1.20  = 

MGMTS 

=0.80  =1.00  = 

=  1.20 

20 

75.8 

71.1 

72.2 

73.1 

70.3 

71.1 

72.1 

69.5 

70.2 

70.8 

21 

73.5 

66.5 

67.9 

68.7 

65.7 

66.7 

67.9 

65.0 

65.8 

66.6 

22 

72.0 

63.3 

64.6 

65.5 

62.6 

63.7 

64.8 

61.9 

62.8 

63.7 

23 

70.5 

60.0 

61.4 

62.6 

59.3 

60.5 

61.7 

58.7 

59.7 

60.7 

24 

69.4 

58.2 

59.5 

60.9 

57.5 

58.7 

59.9 

56.9 

58.0 

59.0 

25 

68.2 

58.3 

59.6 

61.0 

57.6 

58.8 

60.0 

57.0 

58.1 

59.1 

26 

68.0 

59.3 

60.6 

62.0 

58.6 

59.8 

61.0 

58.0 

59.1 

60.1 

27 

68.0 

59.1 

60.4 

61.7 

58.4 

59.6 

60.8 

57.8 

58.8 

59.8 

28 

67.4 

58.1 

59.5 

60.8 

57.5 

58.7 

59.9 

56.8 

57.9 

59.0 

29 

66.7 

58.0 

59.4 

60.7 

57.4 

58.6 

59.8 

56.7 

57.8 

58.9 

30 

66 .4 

57.8 

59.2 

60.5 

57.1 

58.4 

59.6 

56.5 

57.6 

58.7 

31 

66.1 

56.4 

57.8 

59.2 

55.7 

57.0 

58.3 

55.1 

56.3 

57.4 

32 

66.8 

58.7 

60.1 

61.4 

58.0 

59.3 

60.5 

57.4 

58.5 

59.5 

33 

69.4 

62.6 

63.9 

65.0 

61.9 

63.1 

64.2 

61.2 

62.2 

63.2 

34 

69.2 

66.4 

67.9 

68.7 

65.7 

66.7 

67.9 

65.0 

65.9 

66.7 

35 

71.1 

69.5 

70.7 

71.7 

68.8 

70.2 

70.6 

68.0 

68.8 

70.1 

36 

73.2 

73.1 

74.4 

75.1 

72.3 

73.2 

74.3 

71.5 

72.2 

72.9 

37 

76.2 

75.7 

77.0 

77.5 

74.8 

75.6 

77.0 

74.0 

74.5 

75.1 

38 

78.5 

78.6 

79.5 

80.2 

77.6 

78.3 

79.0 

76.8 

77.2 

77.6 

39 

80.4 

81.1 

81.9 

82.6 

80.2 

80.7 

81.2 

79.2 

79.5 

79.8 

40 

81.3 

82.0 

82.7 

83.4 

81.0 

81.4 

81.9 

80.0 

80.3 

80.5 

41 

82.1 

82.6 

83.3 

84.0 

81.6 

82.0 

82.4 

80.5 

80.8 

81.0 

42 

80.8 

80.1 

80.8 

81.6 

79.1 

79.6 

80.1 

78.1 

78.5 

78.8 

43 

78.6 

76.5 

77.4 

78.2 

75.6 

76.2 

76.9 

74.7 

75.2 

75.6 

44 

77.6 

73.6 

74.6 

75.7 

72.8 

73.5 

74.3 

71.9 

72.5 

73.0 

45 

75.0 

66.9 

68.0 

69.1 

66.1 

67.1 

68.0 

65.4 

66.2 

66.9 

46 

73.0 

65.5 

66.7 

68.0 

64.9 

65.8 

66.8 

64.2 

65.0 

65.7 

47 

71.8 

63.8 

65.0 

66.0 

63.0 

64.1 

65.0 

62.3 

63.3 

64.1 

48 

68.7 

59.9 

61.3 

62.5 

59.2 

60.4 

61.5 

58.6 

59.6 

60.6 

49 

68.6 

58.5 

59.9 

61.3 

57.9 

59.1 

60.3 

57.3 

58.3 

59.4 

Cont ' d 
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TABLE  G9:  Continued 


Time 

Observed 

MGMT  =  0. 

80 

MGMT  =  1. 

00 

MGMT  =  1. 

20 

=  0.80 

MGMST 

=1.00  = 

'1.20 

=  0.80 

MGMST 

=1.00  = 

1.20 

=  0.80 

MGMST 

=  1.00 

=  1.20 

50 

67.3 

58.1 

59.5 

60.9 

57.5 

58.7 

59.9 

56.8 

57.9 

59.0 

51 

66.3 

57.0 

58.5 

59.9 

56.4 

57.7 

58.9 

55.8 

56.9 

58.0 

52 

65.6 

56.5 

57.9 

59.3 

55.9 

57.2 

58.4 

55.2 

56.4 

57.5 

53 

65.4 

56.6 

58.1 

59.5 

56.0 

57.3 

58.5 

55.4 

56.5 

57.6 

54 

65.4 

55.7 

57.2 

58.6 

55.1 

56.4 

57.7 

54.5 

55.7 

56.8 

55 

65.4 

55.3 

56.8 

58.2 

54.7 

56.0 

57.3 

54.1 

55.3 

56.4 

56 

66  .3 

56.2 

57.6 

59.0 

55.5 

56.9 

58.1 

54.9 

56.1 

57.2 

57 

68.0 

57.6 

59.0 

60.4 

56.9 

58.2 

59.4 

56.3 

57.4 

58.5 

58 

67.6 

58.3 

59.7 

61.1 

57.7 

58.9 

60.1 

57.0 

58.1 

59.2 

59 

66.4 

56.9 

58.3 

59.7 

56.2 

57.5 

58.7 

55.6 

56.7 

57.8 

60 

66 .4 

54.1 

55.5 

57.0 

53.4 

54.8 

56.1 

52.8 

54.0 

55.2 

61 

66.8 

53.5 

55.0 

56.4 

52.9 

54.2 

55.5 

52.3 

53.5 

54.7 

62 

67.2 

52.5 

54.0 

55.5 

51.9 

53.3 

54.6 

51.3 

52.6 

53.8 

63 

65.5 

51.6 

53.2 

54.7 

51.1 

52.5 

53.8 

50.5 

51.8 

53.0 

64 

65.3 

49.0 

50.6 

52.1 

48.4 

49.9 

51.3 

47.9 

49.2 

50.5 

65 

64.0 

48.2 

49.9 

51.4 

47.7 

49.2 

50.6 

47.2 

48.5 

49.8 

66 

62.2 

46.6 

48.2 

49.8 

46.0 

47.6 

49.0 

45.5 

46.9 

48.2 

67 

60.5 

44.6 

46.2 

47.8 

44.0 

45.6 

47.1 

43.5 

45.0 

46.3 

68 

62.5 

45.6 

47.2 

48.8 

45.0 

46.6 

48.0 

44.5 

45.9 

47.3 

69 

60.4 

45.7 

47.4 

49.0 

45.2 

46.7 

48.2 

44.7 

46.1 

47.4 

< 

'l.-w  V.**  $.8A  S.W  6.3*  5-^  Y°* 
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TABLE  G10 :  OTHER  WEATHER  DATA. 


Time 

Barometric 

Wind 

Wind  Direction 

Total 

Cloud 

(hr) 

Pressure 

Speed 

(degrees  east 

Cloud 

Type 

(in  Hg) 

(mph) 

from  North) 

Amount 

1 

27.87 

9 

307 

0 

2 

27.88 

7 

254 

2 

altocumulus 

3 

27.88 

8 

264 

1 

altocumulus 

4 

27.88 

8 

282 

0 

5 

27.89 

10 

292 

1 

altocumulus 

6 

27.89 

4 

240 

1 

altocumulus 

7 

27.90 

4 

190 

7 

altocumulus 

8 

27.90 

7 

209 

9 

altocumulus 

9 

27.90 

7 

190 

5 

altocumulus 

10 

27.89 

5 

222 

8 

altocumulus 

11 

27.88 

8 

175 

1 

altocumulus 

12 

27.86 

9 

190 

1 

altocumulus 

13 

27.83 

10 

180 

1 

altocumulus 

14 

27.80 

14 

172 

1 

altocumulus 

15 

27.78' 

13 

198 

1 

altocumulus 

16 

27.77 

10 

210 

1 

cumulus 

17 

27.75 

3 

210 

1 

cumulus 

18 

27.74 

5 

260 

1 

cumulus 

19 

27.73 

0 

0 

1 

stra to cumulus 

20 

27.73 

7 

120 

1 

cirrus 

21 

27.73 

6 

102 

1 

cirrus 

22 

27.72 

4 

126 

2 

actocumulus 

23 

27.72 

5 

112 

1 

a cto cumulus 

24 

27.72 

5 

38 

8 

altocumulus 

25 

27.71 

9 

44 

9 

altocumulus 

26 

27.70 

8 

70 

7 

altocumulus 

27 

27.68 

6 

81 

9 

altocumulus 

28 

27.66 

6 

57 

8 

altocumulus 

29 

27.65 

7 

70 

9 

altocumulus 

30 

27.64 

9 

88 

4 

stra to cumulus 

31 

27.63 

7 

73 

7 

cumulus 

32 

27.61 

6 

70 

6 

cumulus 

33 

27.59 

9 

140 

3 

cumulus 

34 

27.56 

12 

138 

4 

cumulus 

35 

27.53 

16G22* 

190 

2 

cumulus 

36 

27.50 

16G22 

200 

1 

cumulus 

37 

27.46 

18G24 

190 

1 

cumulus 

38 

27.43 

16G22 

190 

4 

cumulus 

39 

27.40 

18G26 

207 

8 

cumulus 

40 

27.37 

16 

194 

3 

cumulus 

41 

27.34 

12 

188 

8 

cumulonimbus 

42 

27.32 

8 

120 

8 

cumulonimb  us 

43 

27.29 

5 

137 

9 

cumuloninib  us 

44 

27.28 

22 

84 

9 

cumulonimbus 

Cont ' d. 
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TABLE  GlO:  Continued 


Time 

Barometric 

Wind 

Wind  Direction 

Total 

Cloud 

(hr) 

Pressure 

Speed 

(degrees  east 

Cloud 

Type 

(in  Hg) 

(mph) 

from  North) 

Amount 

45 

27.23 

15 

91 

10 

st rat o cumulus 

46 

27.26 

1 

170 

10 

stratocumulus 

47 

27.32 

39G53 

336 

10 

stratocumulus 

48 

27.33 

27G35 

346 

9 

stratus  fractus 

49 

27.34 

6 

30 

10 

stratus 

50 

27.36 

12 

329 

10 

stratus 

51 

27.36 

11 

330 

9 

stratus 

52 

27.35 

10 

325 

9 

stratus 

53 

27.36 

8 

278 

9 

stratus  fractus 

54 

27.37 

12 

288 

9 

stratocumulus 

55 

27.36 

18 

277 

9 

stratocumulus 

56 

27.36 

18G24 

290 

8 

cumulus  fractus 

57 

27.36 

24G34 

300 

10 

stratocumulus 

58 

27.38 

22G40 

308 

10 

stratus  fractus 

59 

27.40 

20G32 

300 

10 

stratocumulus 

60 

27.42 

18G26 

318 

10 

stratocumulus 

61 

27.47 

30G45 

348 

10 

stratocumulus 

62 

27.52 

28G36 

340 

10 

stratocumulus 

63 

27.57 

25G36 

340 

10 

stratocumulus 

64 

27.62 

32G41 

355 

10 

stratocumulus 

65 

27.68 

26 

358 

10 

stratocumulus 

66 

27.72 

29G36 

345 

10 

stratocumulus 

67 

27.75 

29G38 

350 

10 

stratocumulus 

68 

27.79 

27G38 

350 

10 

stratocumulus 

69 

27.81 

29G34 

352 

10 

stratocumulus 

70 

27.83 

21 

350 

10 

cumulus  fractus 

71 

27.84 

16 

355 

10 

stratocumulus 

72 

27.86 

15 

320 

10 

stratocumulus 

4 


Gustiness  is  indicated  by  a  G  after  the  speed  with  the 
peak  gust  given  after  the  G. 
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APPENDIX  Gil:  OBSERVED  AND  PREDICTED  SOLAR  INTENSITY,  BTU/(hr)(ft  ). 


Time  Direct  Horizontal  Cloud  Cover  Total 


Observed 

Model 

Observed 

Model 

Over  Sun 
(observed) 

Cloud 

Amount 

(Model) 

33.5 

197.6 

25.2 

0 

34.0 

217.3 

169.3 

72.4 

89.5 

0 

4 

34.5 

0.5 

42.0 

9 

35.0 

89.9 

189.7 

129.0 

121.1 

7 

2 

35.5 

255.7 

176.9 

0 

36.0 

258.3 

199.4 

179.4 

142.9 

0 

1 

36.5 

264.8 

196.7 

0 

37.0 

270.5 

203.2 

204.6 

153.8 

0 

1 

37.5 

211.2 

211.5 

2 

38.0 

273.6 

197.5 

207.7 

149.5 

0 

4 

38.5 

268.3 

172.5 

0 

39.0 

67.2 

153.6 

192.0 

110.1 

7 

8 

39.5 

229.1 

188.2 

2 

40.0 

260.9 

188.3 

180.3 

120.4 

0 

3 

40.5 

252.2 

151.1 

0 

41.0 

229.5 

134.4 

123.4 

71.2 

2 

8 

41.5 

151.8 

96.9 

2 

42.0 

18.3 

109.8 

38.7 

43.4 

7 

8 

42.5 

0.5 

34.6 

10 

43.0 

0.0 

48.2 

6.3 

11.8 

10 

9 

44.0 

0.0 

0.0 

10 

57.0 

42.3 

74.5 

30.8 

28.9 

8 

10 

57.5 

174.5 

124.3 

4 

58.0 

0.0 

91.7 

34.0 

48.0 

10 

10 

59.0 

100.5 

12.6 

63.6 

10 

60.0 

105.1 

19.5 

74.7 

10 

61.0 

** 

107.2 

38.4 

80.5 

** 

10 

62.0 

107.2 

51.3 

80.5 

10 

63.0 

105.2 

46.3 

74.7 

10 

64.0 

105.1 

53.5 

63.6 

10 

65.0 

*  observed  cloud 

100.5 
cover  was 

15.7 

estimated 

48.0 

when  reading 

s  were 

taken 

10 

with  the 

direct  pyrheleometer  as  the  cover  over  the  sun  at  that  time. 
**  clouding  over  quickly  &  precipitation. 


i.*t  a 

. 

/ 

• 
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TABLE  G12:  SWINE  WEIGHTS. 


Group  Individual  hog  weight  (lb)  Number  of  hogs  Average 

Weight  (lb) 


I 

13,27,4  @  24 

6 

23 

II 

2  @  31,  5  @  33, 
7  @  40 

2  @ 

35, 

4  @ 

37 

20 

36 

III 

5  @  42,  4  @  44 

9 

43 

IV 

9  @  53,  3  @  55, 

2  @ 

57, 

4  @ 

60 

18 

55 

V 

2  @  62,  3  @  64, 

14  @ 

66 

,68 

20 

65 

VI 

71,  2  @  73,  2  @ 

74, 

82, 

2  @ 

84 

8 

77 

VII 

5  @  119,  121 

6 

119 

VIII 

132,  148,  159 

3 

146 

IX 

174,  179,  198 

3 

184 

X 

6  @  250 

6 

250 

Overall 

99 

74 

■ 

2 

APPENDIX  H:  PROCEDURES 


HI:  METHOD  FOR  CALCULATING  RELATIVE  HUMIDITY. 

The  procedure  used  was  described  by  several  references 
(2,40,37,14)  and  was  carried  out  as  follows: 

RH  =  100U/(l-((l-U)(PWdb/B))) 

U  =  W/WS 

WS  =  (0.622  x  PWJV)/(B  -  PWJU) 

tib  db 

W  =  4354.  X  E  /((B  -  E)  x  7000) 

E  =  (PWdb  -  <(B  -  PWdb)  x  (Tdb  -  Iwb))/(2800.  -  (1.3  x 
where  RH  =  relative  humidity,  %; 

U  =  degree  of  saturation; 

PWdb  =  saturation  pressure  at  dry-bulb  temperature,  in  Hg; 

B  =  barometric  pressure,  in  Hg; 

W  =  absolute  humidity  of  the  air; 

WS  =  absolute  humidity  of  the  air  at  saturation; 

E  =  vapor  pressure  of  air,  in  Hg; 

PW^b  =  saturation  pressure  at  wet-bulb  temperature,  in  Hg; 
T^b  =  dry-bulb  temperature,  °F;  and 
T  ,  =  wet-bulb  temperature,  °F. 


* 


. 
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H2 :  METHOD  FOR  CALCULATING  INWARD  FLOWING  FRACTION  OF  RADIATION 
ABSORBED  BY  THE  INNER  AND  OUTER  WINDOW  PANE. 


and 


U/h 

o 


N.  =  U/h  +  U/h 
ii  o  s 


where  N  =  the  inward  flowing  fraction  of  the  radiation  absorbed 

by  the  outer  pane; 

N  =  the  inward  flowing  fraction  of  the  radiation  absorbed 
by  the  inner  pane, 

U  =  overall  heat  transfer  coefficient  for  the  windows, 
h^  =  surface  heat  transfer  coefficient  combining  the 

effects  of  radiation  and  convection  for  the  outer 
surface,  and 

hg  =  surface  heat  transfer  coefficient  combining  the  effects 
of  radiation  and  convection  for  the  air  space  surface 
within  the  double-glazing. 


\ 
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APPENDIX  Is  VALIDATION  INPUT  FOFMAT. 


1  2  39  92  40  62  93  66  90  700 

2  000 

3  000 

4  000 

5  000 

6  000 

7  000 

S  0  16000  16000  20000  20000  20000 

9  23  36  43  55  65  77119146184250 

10  6  20  9  16  20  8  6  3  3  6 

11  100  100 

12  2787  2788  2788  2788  2789  2789  2790  2790  2790  2789  2788  2786  2783 

13  2775  2774  2773  2773  2773  2772  2772  2772  2771  2770  2768  2766  2765 

14  2759  2756  27S3  2750  2746  2743  2740  2737  2734  2732  2729  2728  2723 

15  2734  2736  2736  2735  2736  2737  2736  2736  2736  2738  2740  2742  2747 

16  2768  2772  2775  2779  2781  2783  2784  2786 


27 

28 

29 

30 


2780 

2764 

2726 

2752 


2778  2777 
2763  2761 
2732  2733 
2757  2762 


17 

99  428 

228  228 

428 

000  24 

99  000 

41  000 

000 

41  20712181218 

000 

18 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

19 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

20 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

21 

3000 

3000 

3000 

3000  ' 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

22 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

23 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

3000 

24 

3000 

3000 

3000 

3000 

3000 

3000 

25 

03 

26 

400  000 

146  163 

90 

92 

0.00228 
0.01407 
-0.0040 1 


0.34559 

1.06226 

0.74050 


-1.19908 

-5.59131 


2.22366 

12.15034 


7.20350  -20.11763 


-2.05287 

-11.78092 

19.68824 


0.72376 

4.20070 

-6.74585 


31 

53.34  113 

.31  7.  1 

.EDMONTON 

32 

90. 

0  0 

.00  1 

SOUTH  WAUL 

33 

90. 

0  90.0  2 

WEST  WALL 

34 

90. 

0  -90.0  3 

EAST  WALL 

35 

90. 

0  180.0  4 

NORTH  WALL 

36 

20.50  90.0  5 

WEST  SLOPE 

37 

20.50  -90.0  6 

EAST  SLOPE 

38 

0.00  0 

.00  7 

HORIZONTAL 

39 

253 

10  SEPT  73 

40 

1  .02 

0.20 

.15  4.0 

.67  .17 

41 

0  2  1 

0  1 

17  9  5 

8  1111 

42 

51.7 

51. 0 

50.1  47. 

1  47.2  46. 

43 

67.3 

70.2 

70.8  71. 

0  72.7  72. 

44 

44.  8 

44.3 

42.9  41. 

5  40.7  40. 

45 

51.7 

55.  3 

55.5  56. 

1  58.1  58. 

46 

254 

11  SEPT  73 

47 

1.02 

0.20 

.15  4.0 

.67  .17 

48 

9  7  9 

»  8  9 

4  7  6  3 

4  2  114 

49 

52.  1 

53.6 

53.0  51. 

7  51.8  51. 

50 

69.  1 

72.4 

75.6  76. 

1  77.2  74. 

51 

4  8.5 

49.5 

49.3  48. 

3  48.6  47. 

52 

59.0 

60.9 

62.7  62. 

5  63.0  62. 

53 

255 

12  SEPT  73 

54 

1  .02 

0.20 

.15  4.0 

.67  .17 

55 

1010  9  9  9 

9  9  81010101010101 

56 

51.8 

51.7 

50.4  49. 

9  50.3  49. 

57 

44.4 

43.3 

42.4  39. 

0  39.0  37. 

58 

46.6 

48.  8 

47.7  47. 

2  47.6  46. 

11111112  18 


83889  9101010  9 


9  46.5  48.5  50.9  53.1  54.0  56.9 


35.4  23.3  33.7  33.8  33.8  33.7 
45.3  45.2  46.6  46.6  43.9  39.9 


•  !/*' 


640e 

■ 

■ 

- 


?  «  A  l  f  «  >  >  I  -  :  1  '  :  I  0  t  5i  0 


. 


. 
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APPENDIX  Is  Continued 


59  40.8  40.1  39.4  3S.6  35.6  33.9  31.6  29.3  30.1  29.9  30.1 

60  1000  1  1 

61  NUMERICAL  DATA  FOR  MALLS 

62  MALL  COMPONENTS 


63 

00027  1280000 

171 

214 

0000 

ALUMINUM  SIDING 

64 

0031  3 

0066 

34 

029 

0000 

3/e"  PLYMOOO 

65 

01667 

0022 

325 

0180 

0000 

BATT  INSULATION  2.0" 

66 

00000 

00000 

00000 

00000 

850 

AIR  CAVITY 

67 

00313 

0066 

34 

029 

0000 

3/8"  PLYMOOO 

68 

69 

1  0 

70 

1000  2  1 

71 

NUMERICAL  DATA 

FOR  PITCHED  ROOF 

72 

ROOF  COMPONENTS 

73 

00217 

0430 

7000 

0220 

0000 

ASPHALT  SHINGLES 

74 

00313 

0066 

34 

029 

0000 

3/8"  PLYMOOO 

75 

t  00000 

AIR  SPACE 

76 

01667 

0022 

325 

0180 

0000 

BATT  INSULATION  2.0" 

77 

0031  3 

0066 

34 

029 

0000 

3/8"  PLYMOOO 

76 

79 

10 

80 

1000  3  1 

81 

NUMERICAL  DATA 

FOR  HORIZONTAL  ROOF 

82 

ROOF  COMPONENTS 

83 

00217 

0430 

7000 

0220 

0000 

ASPHALT  SHINGLES 

84 

00313 

00  66 

34 

029 

0000 

3/8"  PLYMOOO 

85 

850 

AIR  SPACE 

86 

01667 

0022 

325 

0180 

0000 

eATT  INSULATION  2.0" 

87 

00313 

0066 

34 

029 

0000 

3/8"  PLYMOOO 

88 

89 

10 

90 

1000  4  1 

91 

NUMERICAL  DATA 

FOR  DOORS 

92 

DOOR  COMPONENTS 

93 

00313 

0066 

34 

029 

0000 

3/8"  PLYMOOO 

94 

0125 

0022 

325 

0180 

0000 

BATT  INSULATION  1.5" 

95 

00313 

0066 

34 

029 

0000 

3/8"  PLYMOOO 

96 

97 

10 

98 


- 


! 


' 

■ 


APPENDIX  J: 


VALIDATION  OUTPUT 


. 


293 


k 

> 

UJ 

o 

► 

• 

< 

CM 

-i 

z 

IL 

z 

o 

o 

H 

44 

o 

o  ►- 

Q 

z 

a  < 

O 

o 

in 

O  3 

> 

O 

44 

*  3 

h 

5 

t- 

z 

►  m 

> 

o 

o  o  o 

a 

3 

3  Z 

> 

3 

o 

Q.  O  O 

44 

z 

a  *■< 

< 

a 

o 

P>  o  o 

a 

1-4 

U 

N 

o 

o  o  o 

u 

z 

*  y- 

t 

w 

o 

o  o  o 

V) 

3 

<0  t- 

a 

c 

o 

o 

o  o  o 

UJ 

-1 

V  < 

\ 

• 

•  t  • 

o 

< 

r>  o 

< 

H 

o  o  o 

o 


u. 

o 


UJ 

UJ 

o 

o 

r> 

© 

o 

o 

u 

o 

fi 

O' 

o 

o 

z 

o 

<0 

•«4 

o 

o 

o 

< 

10 

03 

10 

O' 

o 

o 

o 

fr- 

o 

o 

o 

CO 

o 

• 

\ 

CM 

44 

o 

o 

o 

V) 

• 

• 

• 

• 

• 

a 

< 

<1 

F) 

o 

o 

o 

44 

o 

o 

o 

o 

o 

z 

• 

• 

• 

• 

• 

in 

fr¬ 

o 

o 

O 

o 

© 

o 

UJ 

it. 

o 

1 

1 

1 

a. 

o 

►" 

• 

u. 

44 

y~ 

a 

3 

z 

a 

N 

z 

V) 

N 

44 

3 

■  fr- 

y- 

O 

a 

a> 

z 

< 

y- 

o 

o 

o 

o 

• 

a 

< 

<# 

o 

o 

o 

N 

3 

« 

F> 

o 

o 

© 

Ul 

44 

O' 

CO 

a 

O 

< 

a 

F> 

<0 

•4 

o 

o 

z 

CM 

CM 

44 

o 

CM 

r* 

> 

o 

S 

© 

o 

o 

o 

• 

« 

• 

• 

• 

• 

a 

U. 

m 

CM 

F) 

o 

o 

o 

a 

O 

o 

o 

o 

o 

o 

UJ 

\ 

N 

F) 

o 

o 

o 

m 

fr- 

in 

O 

O 

o 

o 

o 

H 

z 

*- 

• 

• 

• 

t 

• 

3 

44 

z 

o 

o 

o 

o 

o 

UJ 

1 

UJ 

44 

co 

z 

u 

3 

• 

44 

44 

3 

UJ 

y~ 

u. 

« 

C J 

Ik 

* 

> 

o 

o 

o 

o 

z 

o 

UJ 

y- 

o 

o 

o 

o 

< 

z 

o 

a 

44 

o 

o 

If) 

o 

H 

44 

u 

o 

m 

o 

o 

CM 

o 

o 

u 

3 

u. 

z 

• 

• 

• 

• 

• 

3 

a 

CO 

UJ 

44 

< 

FI 

o 

< 

a 

z 

< 

*- 

o 

N 

n 

r> 

z 

< 

►- 

z 

44 

o 

V) 

< 

UJ 

u 

F* 

F- 

(0 

o 

o 

a 

z 

« 

© 

n 

o 

o 

o 

3 

CM 

F- 

44 

o 

o 

3 

a 

< 

CD 

f> 

© 

o 

o 

o 

< 

z 

Z 

S 

FJ 

CM 

o 

o 

o 

o 

a 

o 

10 

o 

o 

o 

»-* 

u 

UJ 

• 

* 

• 

» 

• 

a 

> 

z 

© 

O 

o 

o 

o 

UJ 

3 

K 

fr- 

• 

1 

z 

3 

44 

3 

< 

> 

o 

o 

o 

o 

0 

Z 

2 

1-4 

o 

' 0 

CM 

« 

fr" 

o 

<0 

CM 

© 

y 

o 

o 

O 

o 

o 

3 

• 

• 

• 

• 

• 

O 

CO 

o 

o 

o 

o 

z 

o 

u 


CM 


«n 

V) 


UJ 

N 

F) 

F- 

F) 

z 

44 

© 

44 

* 

o 

F) 

© 

F> 

u 

o 

o 

w* 

o  o 

44 

t 

• 

• 

•  • 

z 

o 

o 

o 

o  o 

fr¬ 

et 

bJ 

>.  «  N  o  4  Ifl 

< 

-l 


■>OhNI0* 
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J3.  Heat  Transfer 


HOURLY  HEAT  FLOWS  THROUGH  THE  STRUCTURAL  COMPONENTS 


WALLS  OOORS  FLOOR  HOR.ROOF 


-646.31 

-808.42 

-542.75 

0.0 

-564.87 

-907.1 1 

-550.61 

0.0 

-531 .89 

-910.48 

-566.35 

0.0 

-99.83 

-837.06 

-629.28 

0.0 

-593.54 

-872.27 

-589.94 

0.0 

-552.54 

-855.40 

-605.68 

0.0 

-994.25 

-906.11 

-558.48 

0.0 

-1380.64 

-977.92 

-542.75 

3.0 

-1391.76 

-1007.70 

-582.08 

0.0 

-1832. 4e 

-1 097.69 

-487.69 

0.0 

-1415.38 

-1070.31 

-495.55 

0.0 

-1313.57 

-1076.26 

-446.36 

0.0 

-772.98 

-1027.44 

-440.49 

0.0 

-980.79 

-1051.49 

-424.76 

0.0 

-231.98 

-1053.72 

-416.90 

0.0 

40 .65 

-1061.29 

-424.76 

0.  0 

-120.56 

-1141.06 

-377.57 

0.0 

176.06 

-1 165. 9e 

-377.57 

0.0 

243.32 

-11 85.97 

-369.70 

0.0 

1425.87 

-991 .04 

-527.02 

0.0 

1009.27 

-945.61 

-550.62 

0.0 

453.12 

-1  101  .68 

-566.35 

0.0 

418.79 

-1  1  01 .83 

-597.81 

0.0 

-35.74 

-1101.82 

-582.08 

0.  0 

-677.43 

-1101.82 

-527.02 

0.0 

-1029.38 

-1 1  pi . 82 

-487.69 

0.0 

-714.76 

-1101.82 

'—519. 15 

0.0 

-469.82 

-1101 .82 

-550.62 

0.0 

-793.17 

-1 101 .82 

-534.88 

0.0 

-624.06 

-1101 .82 

-542.75 

0.0 

-327.01 

-1 101 .82 

-582.08 

0.0 

-1271.43 

-738.31 

-550.62 

0.  0 

-1569.82 

-1034.52 

-534.88 

0.0 

-1393. 90 

-1 079.21 

-51 1 .29 

0.0 

-1063.48 

-1056.21 

-511.29 

0.0 

-1164.14 

-1078.53 

-448.36 

0.0 

-893.30 

-1062.81 

-416.90 

0.0 

-964.45 

-1108.29 

-369.70 

0.0 

-871.16 

-1 1 83.59 

-314.64 

0.0 

-188.00 

-1165.05 

-338.23 

0.0 

-55.67 

-1215.29 

-306.77 

0.0 

741 . 14 

-1154.29 

-385.43 

0.0 

913.75 

-1113.60 

-432.63 

0.0 

530.1  1 

-1107.17 

-432.63 

0.0 

1482.83 

-911 .64 

-597.81 

0.0 

30.98 

-1012.95 

-495.55 

0.0 

-51.15 

-1 oeo.74 

-519.15 

0.0 

497.56 

-1080.79 

-613.54 

0.  0 

-181.46 

-1 080 .78 

-574.21 

0.0 

-557.96 

-1080.78 

-550.62 

0.0 

-443.42 

-1080.78 

-574.21 

0.0 

-589.39 

-1080.78 

-574.21  • 

0.0 

-789.73 

-1080.78 

-550.62 

0.0 

-622.05 

-1080.78 

-582.08 

0.0 

-638.14 

-ioeo.76 

-574.21 

0.0 

-944.81 

-670.97 

-605.68 

0.0 

-1013.35 

-911.91 

-597.81 

0.0 

-739.03 

-912.35 

-621.41 

0.0 

-54.73 

-805.16 

-700.07 

0.0 

357.49 

-695.21 

-770.86 

0.0 

-304.0  1 

-722.38 

-715.80 

0.0 

-298.06 

-747.78 

-723.67 

0.0 

-327.78 

-670.87 

-731.53 

0.0 

234. 17 

-618.05 

-794.46 

0.0 

-286.24 

-681 .14 

-747.26 

0.0 

-130.84 

-670.48 

-763.00 

0.0 

-142.44 

-660.51 

-770.86 

0.0 

-1443.95 

-774.66 

-1030.44 

0.0 

-1540.24 

-755.97 

-1022.57 

0.0 

-1764.61 

-756.07 

-1077.63 

0.0 

-ISIS. 18 

-758.07 

-1101.23 

0.0 

-1613.76 

-758.07 

-10*8.36 

0.0 

PIT. ROOF  WINDOWS  TOTAL  HR 


-1354.17 

-186.71 

-3538.38 

1 

-1138.17 

-189.42 

-3350. 19 

2 

-1054.20 

-194.83 

-3257.74 

3 

-60. 61 

-216.48 

-1843.25 

4 

-1186.13 

-202.95 

-3444.83 

5 

-1088.52 

-208.36 

-3310. 49 

6 

-2094.67 

-192.12 

-4745.62 

7 

-2900.21 

1 494.49 

-4307.04 

8 

-2596.99 

4256.87 

-1321.64 

9 

-3092.11 

3740.91 

-2769.06 

10 

-1218.98 

4248.97 

48.75 

1  1 

47.92 

2782.96 

-7.31 

12 

2085.69 

1236.09 

1080.87 

1  3 

3285. 89 

962.13 

1790.98 

1  4 

2578.73 

875.05 

1751.18 

15 

3154.42 

750.67 

2459.69 

16 

1979.17 

589.55 

929. 54 

17 

1758.91 

358.87 

750.29 

18 

1259.42 

70.57 

17.64 

19 

3585.27 

-181.30 

3311.78 

20 

2463.41 

-189.42 

1787.03 

21 

1163.50 

-194.83 

-246. 24 

22 

1087.53 

-205.65 

-398.97 

23 

58.61 

-200.24 

-1861.27 

24 

-1399.02 

-  181 . 30 

-38e6.  58 

25 

-2195.81 

-167.77 

-4982.48 

26 

-1473.96 

-178.59 

-3988. 29 

27 

-913.74 

-189.42 

-3225. 42 

28 

-1397.66 

-184.01 

-40 11. 54 

29 

-1412.44 

-186.71 

-3867.78 

30 

-611.27 

-200.24 

-2822.42 

31 

-2640.45 

2021 .43 

-3179.38 

32 

-2986. 43 

4414.49 

-1711. 16 

33 

-1961 .40 

4725.92 

-219.88 

34 

-327.40 

4191.73 

1233.37 

35 

371.27 

2757.77 

438.00 

36 

1765.56 

1226.92 

619.48 

37 

1880.60 

938. 32 

376.47 

38 

1443. 48 

667.19 

-25e.71 

39 

2351.05 

756.65 

1416.40 

40 

1826.39 

439.20 

687. 85 

41 

2776.86 

234.13 

2212.40 

42 

2628.48 

-26.41 

1969.59 

43 

1463. 96 

-i4e.83 

305.45 

44 

3526.92 

-205.65 

3294.64 

45 

189.39 

-170.48 

-1458.60 

46 

8.91 

-178.59 

-1820.72 

47 

1271.93 

-211.07 

-135.90 

48 

-269.55 

-197.54 

-2303. 54 

49 

-1121.85 

-189.42 

-3500.63 

50 

-853.15 

-197.54 

-3149.11 

51 

-1181.82 

-197.54 

-3623.75 

52 

-1638.59 

-189.42 

-4249.14 

S3 

—1084.06 

-200.24 

-3410.02 

54 

-1290.14 

-197.54 

-3780.81 

55 

-1903.87 

1593.63 

-2531.69 

56 

-1882.66 

2232.99 

-2172.74 

57 

-941.30 

2434.98 

-779.11 

58 

1093.39 

2065. 31 

1598.74 

59 

2537.17 

1 259.76 

2688.35 

60 

1461.20 

468.55 

187.56 

61 

1675.98 

324.42 

230.88 

62 

1463.46 

274.55 

7.82 

63 

2368.54 

188.29 

1378.50 

64 

685.02 

110.48 

-919.14 

65 

558.76 

-17.38 

-1022.93 

66 

190. 49 

-174.87 

-1558. 19 

67 

-2876.22 

-354.48 

-6479.75 

68 

-3018.56 

-351.78 

-6689.10 

69 

-3772.67 

-370.72 

-7741.71 

70 

-3133.32 

-376.83 

-6664.62 

71 

-3359.31 

-376.13 

-7198.63 

72 
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J4.  Ventilation  Criteria. 


HOURLY  VENT  1L  AT  I  CN  CRITERIA 

I 


VC  NT  . (  IN) 

VENT . W 

RH.M  ' 

VENT .H 

RH.H 

SUPL.H 

3000. 

1303. 

70.0 

2938. 

56.7 

-11753. 

3000. 

t  332  . 

70.0 

2963. 

57.  0 

-11918. 

3000. 

1193. 

70.0 

29*0. 

5*.  1 

-13155. 

3000. 

1*59. 

70.0 

2946. 

58.5 

-12513. 

3000. 

1268. 

70.0 

2968. 

55.3 

-13252. 

3000. 

1*36. 

70.0 

2958. 

57.8 

-12358. 

3000. 

1  *  T2  . 

70.  0 

2969. 

58.5 

-11180. 

3000. 

1307. 

70.0 

2965. 

56.2 

-11982. 

3000. 

1250. 

70.  0 

2968. 

55.8 

-13252. 

3000. 

81  1  . 

70.0 

2955. 

**.5 

-13695. 

3000. 

715. 

70.0 

3055. 

*0.7 

-15087. 

3000. 

603. 

70.0 

302*. 

35.  0 

-13998. 

3000. 

62  3. 

70.0 

3085. 

36.7 

-13920. 

3000. 

686. 

70.0 

3020. 

*1.2 

-126*7. 

3000. 

67*. 

70.0 

30  10. 

40.6 

-12*05. 

3000. 

69*. 

70.0 

30*9. 

*1.6 

-12728. 

3000. 

7*7. 

70.0 

2959. 

**.6 

-10592. 

3000. 

7*6. 

70.0 

2938. 

**.6 

-10*91. 

3000. 

77*. 

70.0 

2963. 

*5.7 

-10267. 

3000. 

1  706. 

70.  0 

3083. 

63.  1 

-93**. 

3000. 

1992. 

70.0 

3069. 

65.  1 

-7706. 

3000. 

2913. 

70.0 

2916. 

70.0 

-21  . 

3000. 

*180. 

70.0 

2951. 

73.0 

966*. 

3000. 

3803. 

70.0 

2962. 

72.3 

6*5*. 

3000. 

3602. 

70.0 

2978. 

71.8 

*332. 

3000. 

331  *. 

70.0 

2970. 

71.1 

2200. 

3000. 

3597. 

70. a 

2951  . 

71.9 

**03. 

3000. 

3657. 

70.0 

2952. 

72.  0 

5106. 

3000. 

*368. 

70.0 

2937. 

73.5 

1 020*. 

3000. 

3375. 

70.0 

2930. 

71.* 

3180. 

3000. 

3671  . 

70.0 

2961. 

.  72>l 

5*55. 

3000. 

3189. 

70.0 

2928. 

70.9 

188*. 

3000. 

2178. 

70.  0 

2969. 

66.* 

-550*. 

3000. 

1626. 

70.0 

3066. 

62.0 

-950*. 

3000. 

1  20*. 

70.0 

3067. 

56.* 

-12216. 

3000. 

1137. 

70.  0 

3035. 

55.6 

-1082*. 

3000. 

1125. 

70.0 

3038. 

55.6 

-10079. 

3000. 

1032. 

70.0 

2997. 

53.  8 

-9115. 

3000. 

969. 

70.0 

2910. 

52.6 

-7610. 

3C0  0  • 

893. 

70.0 

2962. 

50.3 

-8700. 

3000. 

876. 

70.0 

2936. 

*9.  8 

-7831 . 

3000. 

989. 

70.0 

3002. 

52.9 

-9665. 

3000. 

1202. 

70.  0 

3026. 

57.2 

-9892. 

3000. 

1352. 

70.  0 

301*. 

59.* 

-90*9. 

3000. 

20*3. 

70.0 

30*5. 

65.6 

-76*2. 

3000. 

2120. 

70.  0 

3028. 

66.1 

-57*8. 

3000. 

280*. 

70.0 

2963. 

69.  5 

-1063. 

3000. 

3935. 

70.0 

2955. 

72.5 

7800. 

3000. 

*259. 

70.0 

2958. 

73.2 

9709. 

3000. 

5058. 

70.0 

29*6. 

7*.* 

15133. 

3000. 

5011. 

70.0 

29*0. 

7*.* 

1551 3. 

3000. 

*937. 

70.0 

291  2. 

7*. 5 

151 81 . 

3000. 

56*0. 

70.0 

29*3. 

75.  2 

19375. 

3000. 

3856. 

70.0 

2953. 

72.6 

6883. 

3000. 

3209. 

70.0 

2973. 

70.8 

1771. 

3C00. 

2*36. 

TO.O 

2922. 

67.8 

-38*6. 

3000. 

2618. 

70.0 

292e. 

68.7 

-2*10. 

3000. 

2316. 

70.0 

2953. 

67.  1 

-5162. 

3000. 

1  887. 

70.0 

2963. 

63.8 

-9881. 

3000. 

1556. 

70.0 

2932. 

59.8 

-1*032. 

3000. 

2061. 

70.0 

2925. 

65.1 

-8195. 

3000. 

2279. 

70.0 

29*7. 

66.5 

-6*30. 

3000. 

2383. 

70.0 

2930. 

67.2 

-53*0. 

3000. 

18*0. 

70.0 

29*9. 

62.2 

-11852. 

3000. 

2031  . 

70.0 

2937. 

6*.  1 

-9131. 

3000. 

1981  . 

70.  0 

29*3. 

63.* 

-99*8. 

3000. 

1767. 

70.0 

2  95  8. 

60.3 

-12501. 

3000. 

1261. 

70.  0 

2931. 

51.6 

-23567. 

3000. 

136*. 

70.0 

2925. 

5*.  2 

-21858. 

3000. 

1226. 

70.0 

2939. 

51.3 

-25298. 

3000. 

12*0. 

70.0 

2920. 

51.9 

-25360. 

3000. 

1270. 

70.0 

2925. 

52. 5 

-2*831. 

CAL CULATCD  FOR  THE  MOOEL  HOC  BARN 


TOTAL 

AN+H 

T.O  1 

.1  *8.0 

M 

HR 

RH.O 

21126. 

2*66*. 

51.7 

56.6 

*4.8 

15.2 

1 

59.2 

216*9. 

25000. 

51  .0 

88.0 

**.3 

18.0 

2 

59.0 

22134. 

25392. 

50.1 

57.3 

*2.9 

14.9 

3 

86.3 

2*790. 

26633. 

*7.1 

55.1 

*1.5 

14.4 

* 

63.4 

23*16. 

26861 . 

*7.2 

54.7 

*0.7 

14.3 

5 

58.0 

2*006. 

27319. 

46.2 

53.9 

*0.4 

14.2 

6 

61.5 

22172. 

26918. 

*7.5 

54.6 

4  1.5 

14.3 

7 

61.3 

21*21. 

25729. 

*9.8 

56.7 

*3.0 

14.7 

8 

58.3 

22897. 

2*218. 

52.0 

59.4 

*5.1 

15.4 

9 

59.4 

1 8879. 

216*8. 

57.8 

64.0 

46.7 

16.7 

10 

43.3 

19695. 

19646. 

61.2 

67.5 

*8.5 

18.0 

1  1 

39.5 

17*85. 

17*92. 

65.* 

71.1 

49.7 

19.5 

12 

31.8 

17**2. 

16361. 

67.3 

72.9 

51.7 

20.4 

13 

34.0 

16366. 

1*575. 

70.2 

75.6 

55.3 

21.9 

14 

39.1 

15981. 

1 *230. 

70.8 

76.1 

55.5 

22.2 

15 

38.2 

16*80. 

1*021. 

71.0 

76.4 

56.  1 

22.4 

16 

39.6 

1*167. 

13238. 

72.7 

77.5 

58.1 

23.  1 

17 

*2.1 

1*060. 

13310. 

72.6 

77.4 

58.0 

23.0 

18 

42.1 

13898. 

13880. 

71  .9 

76.6 

57.8 

22.5 

19 

43.3 

20927. 

17615. 

6*  .2 

70.9 

57.7 

19.* 

20 

68.7 

21955. 

2016e. 

59.6 

66.6 

54.2 

17.6 

21 

71.6 

21571. 

21817. 

56.5 

63.7 

52.5 

16.6 

22 

77.7 

23207. 

23605. 

52.9 

60.5 

50.0 

15.7 

23 

82.6 

227*7. 

2*609. 

51.3 

58.7 

48.2 

15.2 

2* 

80.9 

20666. 

2*553. 

52.1 

58.8 

*8.5 

15.2 

25 

78.3 

19013. 

23995. 

53.6 

59.8 

*9.5 

15.5 

26 

76.0 

20118. 

2*107. 

53.0 

59.6 

*9.3 

15.  * 

27 

78.1 

21383. 

2*609. 

51  .7 

58.7 

48.3 

1  5.2 

28 

79.3 

20653. 

2*66*. 

51.8 

58.6 

*8.6 

15.2 

29 

60.5 

20908. 

2*776. 

51.5 

58.4 

*7.9 

15.  1 

30 

78.  1 

22737. 

25560. 

*9.6 

57.0 

*6.5 

14.8 

31 

80.* 

21150. 

2*330. 

52.2 

59.2 

48.5 

15.3 

32 

77.8 

20667. 

22378. 

55.9 

62.7 

50.9 

16.3 

33 

72.2 

20235. 

20*55. 

59.6 

66.1 

53.  1 

17.* 

3* 

66.5 

20116. 

18882. 

62.3 

68.8 

54.0 

18.5 

35 

59.7 

17307. 

16869. 

66.* 

72.1 

56.9 

20.0 

36 

57.0 

16003. 

1 538*. 

69.  1 

7*.* 

59.0 

21.2 

37 

56.3 

13902. 

1 3525. 

72.* 

77.1 

60.9 

22.8 

38 

53.0 

1 1 *08. 

11667. 

75.6 

79.6 

62.7 

2*. 5 

39 

50.0 

12*55. 

11039. 

76.1 

80.4 

62.5 

25.  1 

*0 

*8.0 

1 1163. 

1 0*75. 

77.2 

81 .1 

63.0 

25.7 

4  1 

46.8 

1**15. 

1 2202. 

7*  .  0 

78.9 

62.0 

24.0 

42 

82.2 

16*07. 

14*37. 

70.3 

75.8 

60.6 

22.0 

*3 

se.6 

1 6*09. 

1610*. 

67.8 

73.3 

59.1 

20.6 

«* 

61.2 

23231. 

19937. 

59.* 

67.0 

5*.* 

17.8 

45 

73.9 

19168. 

20627. 

59.5 

65.8 

53.9 

17.3 

*6 

70.9 

19771. 

21592. 

57.5 

64.1 

53.0 

16.7 

*7 

75.6 

23525. 

23661 . 

52.6 

60.4 

*9.7 

15.6 

*8 

62.7 

22082. 

2*385. 

51 .8 

59.1 

48.8 

15.3 

*9 

81.8 

21108. 

2*609. 

51  .7 

58.7 

46.8 

15.2 

50 

62.4 

22018. 

25167. 

50.* 

57.7 

*7.7 

1  5.0 

51 

83.2 

2182*. 

25**8. 

*9.9 

57.2 

♦  7.2 

14.8 

52 

83.0 

21142. 
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APPENDIX  K:  COMPUTER  TIME  AND  COST 

NOTE:  All  times  and  costs  are  for  a  three-day  simulation 
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I.  Compilation 


Source  Program 

CPU  Time  (seconds) 

MAIN 

15.711 

START 

5.652 

HP  ROD 

1.065 

PH20 

0. 663 

PICE 

0.584 

NAMEA1 

18.981 

POLES 

4.188 

MATRIX 

4.996 

ORIGIN 

6.538 

FREQRE 

3.686 

SOLVN 

2.383 

POLYM 

0.992 

AIRCAV 

1.695 

SOLAR 

13.385 

FLUX 

4.184 

WALL 

2.330 

VENTIL 

2.130 

TOTAL 

89.163 

Cost  $4.46* 

*  Resource  costs  are  based  on  the  following  formula: 

Final  cost  =  computer  resource  charge  x  priority 
factor  x  client  factor 
where  CPU  time  =  $300. /hr 

VM  CPU  =  $3. 00/page-hour 
Priority  factor  =1.3 
Client  factor  -0.6 
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APPENDIX  K:  Continued 

II  Execution 

CPU  Time  =  84.802  seconds  =  $5.15 

VM  -  CPU**  =  219.304  Page  minutes  =  $7.99 

Total  $13.14* 

III  Total  Cost  =  $18.60  (including  $1.00  for  reading  cards  and 

printing) . 

**  VM  -  CPU  is  the  integral  of  vertual  memory  with  respect  to_. 

CPU  time.  It  is  the  measure  of  the  core  storage  reserved 
for  the  program. 
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